2. 计算机
  3. 请阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command 1_Click() Di

请阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command 1_Click() Di

admin2010-11-02  40
问题 请阅读程序：
    Sub subP(b()As Integer)
    For i=1 To 4
    b(i)=2*i
    Next i
    End Sub
    Private Sub Command 1_Click()
    Dim a(1 To 4)As Integer
    a(1)=5：a(2)=6：a(3)=7：a(4)=8
    subP a()
    For i=1 To 4
    Print a(i)
    Next i
    End Sub
    运行上面的程序，单击命令按钮，则输出结果是(    )。
选项 A、2
4
6
8
B、5
6
7
8
C、10
12
14
16
D、出错
答案A
解析 本题考查数组为参数在函数间的传递。本题中，当用户点击控件Command1时，控件的Command1 Click()事件过程被触发，在此过程中首先定义了一个包含4个元素的数组a，并赋值。然后将数组a为参数传递给过程subP，在过程subP中执行for循环分别给a中的4个元素赋值为2、4、6、8。函数执行结束返回过程Command1 Click()，利用for循环打印输出a数组中的值，所以选A。
转载请注明原文地址:https://www.kaotiyun.com/show/I0mp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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