在窗体上画一个名为Command1的命令按钮,然后编写下列程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1,2,3,4,5) j=1 For i=5 To 1 Step-1

admin2010-11-20  21

问题 在窗体上画一个名为Command1的命令按钮,然后编写下列程序:
Option Base 1
Private Sub Command1_Click()
Dim Arr
Arr=Array(1,2,3,4,5)
j=1
For i=5 To 1 Step-1
S=S+Arr(i)*j
j=j*10
Next
Print S
End Sub
程序运行后,单击命令按钮,输出结果是(    )。   

选项 A、54321
B、123
C、12345
D、345

答案C

解析 本题考查使用Array函数给数组元素赋值的应用。分析程序可知,通过For循环将数组中的各个元素通过一定的公式进行运算。运算过程为:当i=5时,Art(5)=5,S=5;当i=4时,Art(4)=4,S=45;当i=3时,Arr(3)=3,S=345;当i=2时,Arr(2)=2,S=2345;当i=1时,arr(1)=1,S=12345;当i=0时,条件不满足退出循环,执行循环后面的语句PrintS。因此,最后输出的值为“12345"。
转载请注明原文地址:https://jikaoti.com/ti/Gjg0FFFM
0

最新回复(0)