问题
单项选择题
在窗体上添加一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private 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 sEnd 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。