2. 计算机
  3. 编写如下程序： Option Base 1 Private Sub Commandl＿Click() Dim a a：Array(1，2，3，4) S＝0 ：j=1

编写如下程序： Option Base 1 Private Sub Commandl＿Click() Dim a a：Array(1，2，3，4) S＝0 ：j=1

admin2019-03-14  33
问题 编写如下程序：
    Option Base 1
    Private Sub Commandl＿Click()
         Dim a
          a：Array(1，2，3，4)
          S＝0  ：j=1
          For i=4 To 1 Step－1
              S=S+a(i)*j
              j=j*10
    Next I
    Print s
End Sub
程序运行后，单击命令按钮Commandl，输出结果为(     )。
选项 A、110
B、123
C、1234
D、4321
答案C
解析 变量a初始化为含4个元素的数组，由于有Option Base 1语句，因此数组下标下界为1，元素值a(1)～a(4)依次为l、2、3、4。For循环中从第4个元素开始对4个元素值运算后累加，运算方法是第1个元素值乘10的0次方，第2个元素值乘10的1次方，第3个元素值乘10的2次方，第4个元素值乘10的3次方。即4+30+200+1000=1234。
转载请注明原文地址:https://kaotiyun.com/show/5pFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)