单选题编写如下程序：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1, 2, 3, 4):s=0:j=1
For i=4 To 1 Step-1
s=s+a(i)*j:j=j*10
Next i
Print s
End Sub
程序运行后，单击命令按钮Command1，输出结果为

A、 110
B、 123
C、 1234
D、 4321

【正确答案】 C

【答案解析】[解析] 本题的循环首先取出数组的最后一位累加，然后取出倒数第二位乘以10以后累加；然后取出倒数第三位乘以100后累加……以此类推，最终结果为1234。