2. 计算机
  3. 编写如下程序： Option Base 1 Private Sub Command1_Click() 　　Dim a 　　a＝Array(1， 2， 3， 4) 　　s＝0： j＝1 　　For i＝4 To 1 Step－1 　　　　s＝s＋a(i)*

编写如下程序： Option Base 1 Private Sub Command1_Click() 　　Dim a 　　a＝Array(1， 2， 3， 4) 　　s＝0： j＝1 　　For i＝4 To 1 Step－1 　　　　s＝s＋a(i)*

admin2019-06-20  36
问题 编写如下程序：
Option Base 1
Private Sub Command1_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
程序运行后，单击命令按钮Command1，输出结果为(　　)。
选项 A、110
B、123
C、1234
D、4321
答案C
解析 变量a初始化为含4个元素的数组，由于有Option Base 1语句，因此数组下标下界为1，元素值a(1)～a(4)依次为1、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/RMUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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