问题
单项选择题
在窗体上画一个名为Command1的命令按钮，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For j=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，其输出结果是
A．1234
B．12
C．34
D．4321
答案
参考答案：A
解析： 本题首先对数组A进行初始化并赋值，a(1)=1，a(2)=2，a(3)=3，a(4)=4；在随后进行的4次循环中，由于j保持10倍增长，然后分别乘以数组的4个元素，即产生一个由4个元素构成的个位、十位、百位和千位的4位数，相当于4*1+3*10+2*100+1*1000，所以本题的答案为A。