单选题
窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：
Dim y As Integer
Private Sub Command1_Click()
Dim x As Integer
x=2
Text1.Text=Fun 2 (Fun1(x),y)
Text2.Text=Fun 1(x)
End Sub
Private Function Fun 1(x As Integer)As Integer
x=x+y:y=x+y
Fun 1=x+y
End Function
Private Function Fun2(x As Integer，y As Integer)As Integer
Fun2=2*x+y
End Function
当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是______。
A．
B．
C．
D．
Dim y As Integer
Private Sub Command1_Click()
Dim x As Integer
x=2
Text1.Text=Fun 2 (Fun1(x),y)
Text2.Text=Fun 1(x)
End Sub
Private Function Fun 1(x As Integer)As Integer
x=x+y:y=x+y
Fun 1=x+y
End Function
Private Function Fun2(x As Integer，y As Integer)As Integer
Fun2=2*x+y
End Function
当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是______。
A．
B．
C．
D．
【正确答案】
C
【答案解析】[解析] 函数Funl和Fun2都是传值调用，其中，Text1文本框中的内容使用了嵌套调用。实参x是过程变量，实参y是窗体变量。