在窗体上画一个命令按钮,然后编写如下事件过程: 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

admin2010-09-11  29

问题 在窗体上画一个命令按钮,然后编写如下事件过程:
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
运行上面的程序,单击命令按钮,其输出结果是【  】。

选项

答案1234

解析 跟踪程序:
由a=Array(1,2,3,4)可知:
a(1)=1
a(2)=2
a(3)=3
a(4)=4
执行循环体:
s=s+a(i)*j=a(4)*1=4,j=j*10=10
s=s+a(i)*j=4+a(3)*10=34,j=j*10=100
s=s+a(i)*j=34+a(2)*100=234,j=j*10=1000
s=s+a(i)*j=234+a(1)*1000=1234,j=j*10=10000
最终的输出结果是:1234。
转载请注明原文地址:https://kaotiyun.com/show/ykmp777K
0

最新回复(0)