单选题 在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
　　Dim a
　　s=0
　　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
运行上面的程序，单击命令按钮，其输出结果是( )。