问题
单项选择题
有如下程序：
Sub subP(b() As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Private Sub Command1_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_Click()在调用过程subP a()时，为传地址方式调用，此时实参a()和形参b()共享同一段内存空间，因此，对数组b的元素值进行修改，相当于修改了a数组的值，所以最后输出a数组的值时为：a(1)=2，a(2)=4，a(3)=6，a(4)=8。