在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4):j=1 For

admin2017-11-23  37

问题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:
    Option Base 1
    Private Sub Commandl_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
    程序运行后,单击命令按钮,其输出结果是

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

答案B

解析 本题考查的考点是有关循环的。在本题的循环中,首先取得数组的最后一个元素并乘1后放入s;然后取得第3个元素并乘10后加到s里面,然后取得第2个元素并乘1 00后加到s里面,最后取得第1个元素并乘1000后加到s里面,所以s的最终值为1234。
转载请注明原文地址:https://kaotiyun.com/show/MyGp777K
0

最新回复(0)