问题
单项选择题
在窗体上画一个按钮Command1，编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1，2；3，4)
j=1
For i=4 To Step-1
s=s+a(i)*j
j=j*10
Next j
Print s
End Sub
运行程序后，最后的输出结果为( )。
A．1234
B．12
C．34
D．4321
答案
参考答案：A
解析： Array(arglist)函数用于将arglist参数中一组用逗号隔开的值列转换成一个数组并赋值给某数组变量。在本题中，a(1)=1，a(2)=2，a(3)=3，a(4)=4；第一次For循环后：s=0+a(4)*1=4，j=1*10=10；第二次For循环后：s=4+a(3)*10=34，j=10*10=100；第三次For循环后：s=34+a(2)*100=234，j=100*10=1000；第四次For循环后：s=234+a(1)*1000=1234。所以答案为A选项。