在窗体上画一个名为Commandl的命令按钮,然后编写如下代码: option Base 1 Pdvate Sub Commandl_Click() Dim a a=Array(1,2,3,4) J=1 For i=3 To 1 Step-1 s=s+a(

admin2009-08-25  30

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

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

答案A

解析 B=4×1+3×10+2×100+1 x 1000=1234。
转载请注明原文地址:https://jikaoti.com/ti/XQq0FFFM
0

最新回复(0)