填空题

下面程序的输出结果是 【15】 。
Private Sub Commandl_Click( )
Dim a(1 To 20)
Dim i
Fori = 1 To 20
a(i) = i
Next i
For Each i In a( )
a(i) = 20
Next i
Print a(2)
End Sub

【参考答案】

T
<上一题 目录 下一题>
热门 试题

填空题
调整活动窗口大小的宏操作是 【11】 。
填空题
阅读下列程序。 Option Base 1 Private Sub Form_Click( ) Dim x(3, 3) For j = 1 to 3 For k = 1 To 3 If j =k then x(J, k) = 1 If j ＜ ＞ k then x(j, k) = k Next k Next j Call fun(x( ) ) End Sub Private Sub fun(x( ) ) For j = 1 to 3 For k = 1 to 3 Print x(j, k); Next k Next j End Sub运行程序时，输出结果为 【13】 。
相关试题