编写如下程序:Option Base 1Private 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 sEnd Sub程序运行后,单击命令按钮Command1,输出结果为( )。
A.110
B.123
C.1234
D.4321
热度🔥1,475
参考答案:C
解析:
【解析】变量a初始化为含4个元素的数组,由于有Option Base 1语句,因此数组下标下界为1,元素值a(1)~a(4)依次为1、2、3、4。For循环中从第4个元素开始对4个元素值运算后累加,运算方法是第1个元素值乘10的0次方,第2个元素值乘10的1次方,第3个元素值乘10的2次方,第4个元素值乘10的3次方。即4+30+200+1000=1234。