问题 填空题

有如下事件过程:
Private Sub Form_Active()
Dim Score(1 to 3) As Integer
Dim i As Integer
Dim t As Variant
For i=3 To 1 step-1
Score (i)=2*i
Next
For Each t In Score
Print t
Next
End Sub
程序运行后窗体上显示的值为______。

答案

参考答案:2 4 6

解析: 本题考查数组的定义和For Each…Next语句。题中定义了下标下界为1,下标上界为3的Score数组,通过For循环语句赋值后,再通过For Each…Next语句在窗体上输出数组中的每个成员。

选择题
单项选择题