单选题 在窗体上画一个命令按钮（其名称为Commandl），然后编写如下代码： 　　Private Sub Command l_Click（） 　　Dim a 　　a=Array（1,2,3,4） 　　I=3：j=1 　　Do While i＞=0 　　s=s＋a（i）*j 　　i=i-1 　　j=j*10。 　　Loop 　　Print s 　　End Sub 　　运行上面的程序，单击命令按钮，则输出结果是