阅读程序: Option Base 1 Sub P(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Form_Click()

admin2018-09-19  16

问题 阅读程序:
Option Base 1
Sub P(b() As Integer)
    For i = 1 To 4
        b(i) = 2 * i
    Next i
End Sub
Private Sub Form_Click()
    Dim a(4) As Integer
    For i = 1 To 4
        a(i) = i + 4
    Next i
    P 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、4
8
12
16

答案A

解析 Form_Click过程中首先对a数组用For循环赋值。然后调用过程P。注意P参数传递是引用传递,因此数组a的元素值在执行P过程后会被改变。之后的For换输出变量值是过程P中对数组元素的赋值。选A)。
转载请注明原文地址:https://kaotiyun.com/show/a6Fp777K
0

最新回复(0)