单项选择题

设有命令按钮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

<上一题目录下一题>

热门试题

单项选择题

下列程序运行时输出的结果是( )。 Private Sub Form_Click( ) Dim a a=Array(“天天向上”，“清华大学”，“夭长地久”，“程序设计”) For i=LBound(a,1) to UBound(a,1) If Left(a(i),1)= 天 Then Print a(i): Next End Sub

A) 天天向上
B) 天天向上天长地久
C) 出错信息
D) 天天向上清华大学天长地久程序设计

单项选择题

执行下列程序段后，输出的结果是( )。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y

A) 90
B) 60
C) 40
D) 10

相关试题