问题详情

在窗体上画一个名为Commandl的命令按钮，然后编写如下代码：
option Base 1
Pdvate Sub Commandl_Click()
Dim a
a=Array(1，2，3，4)
J=1
For i=3 To 1 Step-1
s=s+a(i)*J
j=j*10
Nexti
Print s
End Sub
运行上面的程序，其输出结果是
A．1234
B．12
C．34
D．4321