在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a s=0:j=1 a=Array(1,2,3,4) For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮,其输出结果是 D.12
A.4221 B.1234 C.34
【参考答案】
B 解析：数组名a为变体型变量,用Array函数对其进行初始化,得到a(1)=1,a(2)=2,a(3)=3和a......