在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Option Base l Private Sub Commandl_Click( ) Dim a a=Array(1,2,3,4) j=l For i=4 To 1

admin2013-10-06  57

问题 在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Option Base l
Private Sub Commandl_Click(     )
Dim a
a=Array(1,2,3,4)
j=l
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Nexti
Print s
End Sub
运行上面的程序,单击命令按钮,其输出结果是(     )。

选项 A、4321
B、12
C、34
D、1234

答案D

解析 考查累加运算。s为求和项,a(i)*j为每一项,i的变化为4到1,j的变化为10的倍数。因此求和s为:4*1+3*10+2*100+1*1 000,结果为1234。
转载请注明原文地址:https://kaotiyun.com/show/3hQp777K
0

最新回复(0)