单项选择题
设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click()
Dim a(3,3) As Integer
For i=1 To 3
For i=1 To 3
a(i,j)=i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
Print Sum
End Sub
运行程序,单击命令按钮,输出结果是
A.20
B.7
C.16
D.17
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
一个关系表的行称为______。
点击查看答案&解析
单项选择题
有如下程序: Option Base 1 Dim arr() As Integer Private Sub Form_Click() Dim i As Integer, j As Integer ReDim arr(3,2) For i=1 To 3 for j=1 To 2 arr(i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next j Print arr(3,2); arr(3,4) End Sub 程序运行后,单击窗体,输出结果为
A.8 13
B.0 13
C.7 12
D.0 0
点击查看答案&解析
相关试题
下面的程序执行时,可以从键盘输入一正整数...
在窗体上画一个名称为Command1的命令按钮...
在窗体上画一个命令按钮,其名称为Command...
窗体上命令按钮Command1的事件过程如下:...
在窗体上画一个命令按钮和一个文本框,其名...