[单项选择题] 在窗体上面一个名为Command1的命令按钮，然后编写如下代码：Option Base 1Private Sub Command1_Click() Dim a a=Ar

[单项选择题] 在窗体上面一个名为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a a=Ar

[单项选择题] 在窗体上面一个名为Command1的命令按钮，然后编写如下代码：

Option base 1

Private Sub Command1_Click()

Dim a

a=Array(1,2,3,4)

j=1

For i=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

参考解析：

Array(arglist)函数用于将arglist参数中一组用逗号隔开的值列转换成一个数组并赋值给某数组变量。本题中，a(1)=1，a(2)=2，a(3)=3，a(4)=4。 本题每次执行For循环体后，s及j的值情况如下。 第1次：s=0+a(4)*1=4,j=1*10=10； 第2次：s=4+a(3)+10=34，j=10*10=100; 第3次：s=34+(2)+100=234,i=100*10=1000； 第4次：s=234+a(1)*1000=1234。