单项选择题

在窗体上画一个命令按钮(其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 运行上面的程序，单击命令按钮，其输出结果是( )。