[填空题] 有如下事件过程: Private Sub Form_Adivate() Dim Score(1 to 3 ) As Integer Dim i As Integer Dim t A

14 查阅

[填空题] 有如下事件过程:

Private Sub Form_Adivate()

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*1

Next

For Each t In Score

Print t

Next

End Sub

程序运行后窗体上显示的值为 (10)

参考答案:

2 4 6

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

计算机考试