单选题
窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写有下列程序：
Dim y As
Integer
Private Sub Command1_Click()
Dim x As
Integer
x=2
Text1.Text=-p2(p1(x),y)
Text2.Text=-p1(x)
End Sub
Private
Function,p1(x As Integer)As Integer
x=x+y:y=x+y
p1=x+y
End Function
Private Function
p2(x As Integer,y As Integer)As Integer
p2=2*x+y
End Function
程序运行后，当单击命令按钮时，文本框Text1和Text2内的值分别是______。
- A.2 4
- B.2 4
- C.10 10
- D.4 4
【正确答案】
C
【答案解析】[考点] 参数传递
[解析] 本题中，y为窗体变量，初值为0；过程P1、P2的参数均按址传送。当执行语句“Text1.Text=p2(p1(x),y)”时，先调用过程P1(x)，此时形参x=2，y=0，x=x+y=2+0=2，y=x+y=2+0=2，函数返回值P1=2+2=4。然后调用过程p2(4，y)，此时形参x=4，y=2，函数返回值P2=2*4+2=10。
当执行语句“Text2.Text=p1(x)”时，形参x=2，y=2，x=x+y=2+2=4，y=x+y=4+2=6，函数返回值P1=4+6=10。