【单选题】

在窗体上添加一个R命令按钮，名称为Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为

OptionBase 1
Private SubCommand1_Click()
Dim aAs Variant
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step-1
　　S=S+a(i)*j
　　j=j*10
Next
Print s
End Sub
A．4321
B．1234
C．34
D．12