[单项选择题] 在窗体上画一个名称为CoilTlilandl的命令按钮,然后编写如下事件过程: Private Sub command1 Click()Dim m As Integer, i As
21 查阅
[单项选择题] 在窗体上画一个名称为CoilTlilandl的命令按钮,然后编写如下事件过程:
Private Sub command1 Click()
Dim m As Integer, i As Integer, x(3)As Integer
For i=0 To 3:x(i)=i:Next i
For i = 1 To 2: Call sub1(x,i):Next i
For i = 0 To 3: Print x(i);: Next i
End Sub
Private Sub sub1(a()As Integer,k As Integer)
Dim i As Integer
Do
a(k)=a(k)+a(k+1)
j = j + 1
Loop While j < 2
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
A.0 3 7 5
B.0 1 2 3
C.3 2 4 5
D.0 5 8 3
参考答案: