单项选择题

在窗体上画一个按钮Command1,编写如下代码:
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2;3,4)
j=1
For i=4 To Step-1
s=s+a(i)*j
j=j*10
Next j
Print s
End Sub
运行程序后,最后的输出结果为( )。

A.1234
B.12
C.34
D.4321