[填空题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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】 。
[填空题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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 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。
VIP截止日期:2024-12-31 10:46:32
←请使用支付宝扫码支付VIP截止日期:2024-12-31 10:46:32
←请使用微信扫码支付