单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a()
a=Array(1,3,5,7)
s=0
Fori=1 To 3
s=s*10+a(i)
Nexti
MsgBox s
End Sub
程序运行后，输出结果为（）。

点击查看答案&解析