问题 单项选择题

在窗体上添加一个命令按钮(其Name属性为Command1),然后编写如下代码:
Option Base 1
Private Sub Command1_Click()
Dim a
s = 0
a = Array(4, 3, 2, 1)
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.1234

C.34

D.12

答案

参考答案:A

解析:

[分析]: 数组名a为变体型变量,用Array函数对其进行初始化,得到a(1)=4、a(2)=3、a(3)= 2和a(4)=1。变量j在循环中每次计算后扩大10倍,变量s的计算过程为s=1×1+2×10+3×100 +4×1000=4321。

选择题
单项选择题