单选题 单击按钮时,以下程序运行后的输出结果是______。
Private Sub procl(x As Integer, y As Integer, z As Integer)
x=3*Z
y=2*z
z=x+y
End Sub
Private Sub Command1_Click( )
Dim x As Integer, y As Integer, z As Integer
x=1; y=2; z=3
Call procl(x, x, z)
Print x; x; z
Call procl(x, y, y)
Print x; y; y
End Sub
【正确答案】 A
【答案解析】[解析] 从整体上看,可得主调过程将两次调用过程procl后,实参的值将随形参变化而变化。第一次调用被调过程procl,主调过程把实参x,x,z的地址分别传给形参x,y,z,此时形参x,y,z值分别为1,1,3,执行语句x=3*z后,形参x值变为9,此时相对应的实参x也变为9,执行语句y=2*z后,形参y值变为6,则相对应的实参x值变为6。执行z=x+y后,形参z值应为12,当然这次调用后,程序代码输出的数值为6,6,12。第二次调用被调过程procl,主调过程把实参x,y,y的地址分别传给形参x,y,z。我们应注意一下,此时实参x的值为6而不是1,所以此时形参x,y,z值分别为6,2,2,执行语句x=3*z后,形参x值为6,相对实参x值也相应地变为6。执行语句y=2*z后,形参y值变为4,相应的实参y值也变为4,执行2=x+y后,形参z值变为10,相应的实参y的值变为10,而形参y和z的地址相同,最后它们值都应为10,所以此次调用后,程序代码将输出的数值为6,10和10。