[单项选择题] 在窗体上面一个名为Command1的命令按钮,然后编写如下代码:
Option base 1
Private Sub Command1_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.1234
B.12
C.34
D.4321
正确答案:A
参考解析:Array(arglist)函数用于将arglist参数中一组用逗号隔开的值列转换成一个数组并赋值给某数组变量。本题中,a(1)=1,a(2)=2,a(3)=3,a(4)=4。 本题每次执行For循环体后,s及j的值情况如下。 第1次:s=0+a(4)*1=4,j=1*10=10; 第2次:s=4+a(3)+10=34,j=10*10=100; 第3次:s=34+(2)+100=234,i=100*10=1000; 第4次:s=234+a(1)*1000=1234。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)