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

admin2012-09-07  28

问题 在窗体上画一个命令按钮(其Name属性为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、12
C、34
D、1234

答案D

解析 本题考查累加运算。s为求和项,a(i)*j为每一项,i的变化为4到1,j的变化为10的倍数。因此求和s为:4*1+3*10+2*100+1*1 000,结果为1234。
转载请注明原文地址:https://jikaoti.com/ti/yiO0FFFM
0

最新回复(0)