单项选择题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
　　s=0：j=1
　　a=Array(1,2,3,4)
　　For i=4 To 1 Step-1
　　　　s=s+a(i)*j
　　　　j=j*10
　　Next
　　Print s
End Sub
运行上面的程序并单击命令按钮，其输出结果是

点击查看答案&解析