单选题 在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
i=3:j=1
Do While i＞=0
s=s+a(i)*j
i=1-1
j=j*10
Loop
Print s
End Sub
运行上面的程序，单击命令按钮，则输出结果是______。
【正确答案】 D
【答案解析】[解析] 此题主要考查数组和循环。由a=Array(1，2，3，4)可知，a(0)=1，a(1)=2，a(2)=3，a(3)=4。当i=3，j=1时，程序进入第一次循环，s=a(3)*1=4*1=4，i=2，j=10；第二次循环，s=4+a(2)*10=34，i=1，j=100；第三次循环，s=34+a(1)*100=234，i=0，j=1000；第四次循环，s=234+a(0)*1000=1234，i=-1，j=10000；当i=-1时，不满足循环条件，此时跳出循环。