问题
填空题
下面程序的输出结果是______。
Private Sub Command1_Click()
Dim a(1 To 20)
Dim i
For i=1 To 20
a(i)=i
Next i
For Each i In a()
a(i)=20
Next i
MsgBox a(2)
End Sub
答案
参考答案：T
解析： 本题考查循环程序，第一个循环程序初始化a数组，为1，2，3…20；第二个循环把a数组的每个值都变为20，所以本题填a(2)=20。