在窗体上画一个命令按钮，其名称为Command1，然后编写下列代码：
Option Base l
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
程序运行后，单击命令按钮，其输出结果是（ ）。