当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 有如下事件过程: 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)

  

参考答案:

246

  参考解析

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

微信端