[填空题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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)=1a(2)=2a(3)=3a(4)=4执行循环体:s=s+a(i)*j=a(4)*1=4,j=j*10=10s=s+a(i)*j=4+a(3)*10=34,j=j*10=100s=s+a(i)*j=34+a(2)*100=234,j=j*10=1000s=s+a(i)*j=234+a(1)*1000=1234j*10=10000最终的输出结果是:1234。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)