现有如下一段程序: 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 52

问题现有如下一段程序:
  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://kaotiyun.com/show/CPhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类