问题 单项选择题

在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Option Base 1
Private Sub Commmad1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序,单击命令按钮,其输出结果是( )。

A.4321

B.12

C.34

D.1234

答案

参考答案:D

解析: 本题考查累加运算。s为求和项,a(i)*j为每一项,i的变化为4到1,j的变化为10的倍数。因此求和s为:4*1+3*10+2*100+1*1000,结果为1234。

单项选择题
判断题