问题 单项选择题

在窗体上添加一个R命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过的执行结果为( )。
Option Base 1
Private Sub Command1_Click()
Dim a As Variant
a=Array(1,2,3,4
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next
Print s
End Sub

A) 4321
B) 1234
C) 34
D) 12

答案

参考答案:B

解析: 本题的难点是数组在循环中的计算。计算过程为4×100+3×101+2×102+1×103=1234,如果改成For i=1 To 4后,其结果为A)。

单项选择题
单项选择题