问题
单项选择题
下面程序：
Private Sub Form_Click()
Dim x,y,z As Integer
x=5
y=7
z=0
Call P1(x,y,z)
Print Str(z)
End Sub
Sub P1(By Val a As Integer, By Val b As Integer, c As Integer)
c=a+b
End Sub
运行后的输出结果为______。
A．0
B．12
C．Str(2)
D．显示错误信息
答案
参考答案：B
解析：知识点：模块/调用和参数传递
评析：在本题中，用Call过程名的方法调用过程P1，在P1中，将参数C的值改变为12。因为参数C是按地址传送(默认为按地址传送，即ByRef )，故z的值变为12，所以输出值为12。