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

admin2019-06-11  23

问题 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下代码:
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个元素并乘100后加到s里面,最后取得第1个元素并乘1000后加到s里面,所以s的最终值为1234。
转载请注明原文地址:https://kaotiyun.com/show/jyUp777K
0

最新回复(0)