单项选择题

在窗体上面一个名为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
运行上面的程序，其输出结果是( )

点击查看答案&解析