单选题
编写如下程序: Option Base1 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。
提交答案
关闭