问题
单项选择题
有以下程序：
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(i)＝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 6
D．出错
答案
参考答案：A
解析：
[评析] 过程SubP的参数b()是按地址传递的(ByRef,数组的传递方式)，而subP过程用语句subP a()调用后，形参b()的值为b(1)＝2，b(2)＝4，b(3)＝6，b(4)＝8，则实参a()的值亦为以上值。