现有如下一段程序: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(3,5,7,9) x=1 For i=4 To 1 Step-1

admin2012-05-23  14

问题 现有如下一段程序:
  Option Base 1
  Private Sub Commandl_Click()
    Dim a
    a=Array(3,5,7,9)
    x=1
    For i=4 To 1 Step-1
        s=s+a(i)*x
        x=x*10
    Next
    Print S
  End Sub
  执行程序,单击Commandl命令按钮,执行上述事件过程,输出结果是

选项 A、9753
B、3579
C、35
D、79

答案B

解析 本题是一个典型的倒序For循环结构,最终结果应该为9*1+7*10+5*100+3*1000=3579。
转载请注明原文地址:https://jikaoti.com/ti/GBO0FFFM
0

随机试题
最新回复(0)