设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click（）Dim a（3，3）As IntegerFor i=1 To 3For j=1 To 3a（i，j）=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a（i，4-i）Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是（ ）。A．20B．7C．16D．17
设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click（）
Dim a（3，3）As Integer
For i=1 To 3
For j=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
相关考题：
（ 22 ）命令按钮 Command1 的单击事件过程的代码如下：Private Sub Command1_Click( )Dim a(3 , 3)As IntegerFor i=1 To 3For j=1 To 3a(i , j)=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a(i , 4-i)Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是（ ）。A ） 20B ） 7C ） 16D ） 17
设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1 Click() Dim a(3,3)As Integer For i=1 To 3 For j=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．20B．7C．16D．17
设有命令按钮Command1的单击事件过程,代码如下:Private Sub Command1_Click()Dim a As IntegerFor i=1 To 30a(i)=iNextFor Each arrItem 【 】aIf arrItem Mod 7=0 Then Print arrItem;If arritem90 Then Exit ForNextEnd Sub请填空。
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click() Dim a1(4,4),a2(4,4) For i=1 To 4 For j=1 To 4 al(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print al(3,3);a2(3,3)End Sub 程序运行后，单击命令按钮，在窗体上输出的是（ ）。A．6 6 B．10 5 C．7 21 D．6 12
在窗体上有一个命令按钮Command1，编写事件代码如下：Private Sub Command1_Click()Dim a(10)，P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是( )。
设有命令按钮Command1的单击事件过程，代码如下，请填空。Private Sub Command1_Click()Dim a(30) As IntegerFor i=1 To 30a(i) =iNextFor Each arrItem______aIf arrItem Mod 7=0 Then Print arrItem；If arrItem＞90 Then Exit ForNextEnd Sub
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a()a＝Array("机床"，"车床"，"钻床"，"轴承")Print a(2)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array("机床"，"车床"，"钻床"，"轴承")Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
在窗体上面添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click（) Dim a1（4, 4), a2（4, 4) For i = 1 To 4 For j = 1 To 4 a1（i, j) = i + j a2（i, j) = a1（i, j) + i + j Next j Next i Print a1（3, 3); a2（3, 3) End Sub 程序运行后，单击命令按钮，在窗体上输出的内容是（）。A．6 6B．10 5C．7 21D．6 12