问题
单项选择题
在窗体上画一个名为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click()
Dim Arr
Arr = Array(1,2,3,4,5)
j=1
For i = 5 To 1 Step -1
S = S + Art(i) * j
j =j * 10
Next
Print S
End Sub
程序运行后，单击命令按钮，输出结果为( )。
A．54321
B．123
C．12345
D．345
答案
参考答案：C
解析： 本题考查使用Array函数给数组元素赋值的应用。分析程序可知，是通过For循环将数组中的各个元素通过一定的公式进行运算。运算过程为：当i=5时，Arr(5)=5，S=5；当i=4时，Arr(4)=4，S=45；当i=3时，Arr(3)=3，S=345；当i=2时，Arr(2)=2，S=2345；当i=1时，Arr(1)=1，S=12345；当i=0时，条件不满足退出循环，执行循环后面的语句Print S。因此，最后输出的值为“12345”。