[填空题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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
运行一面的程序,单击命令按钮,其输出结果是 【15】 。
正确答案:1234
参考解析:[评析] 跟踪程序: 由a=Array(1,2,3,4)可知: a(1)=1 9(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。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)