题目：
程序段如下，当发生Form_Click事件时，窗体上输出的结果是( )。
Option Explicit
Private x As Integer
Public y As Integer
Sub Test()
Dim y as integer
x=2：y=2
Print"x1=";x;"y1=";y
End Sub
Private Sub Form_Click()
x=1：y=1
Test
Print "X2="；x；"y2="；y
End Sub
A．x1=2 y1=2
x2=2 y2=1
B．x1=2 y1=2
x2=2 y2=2
C．x1=2 y1=1
x2=2 y2=2
D．x1=2 y1=1
x2=2 y2=1
答案：
参考答案：A
解析： 本题首先定义了一个窗体级变量x和一个全局变量y。当发生窗体的单击事件后，给窗体级变量x和全局变量y分别赋值1，然后调用Test函数。在该函数中定义了一个局部变量y，在函数中使用的y是局部变量，给窗体级变量x赋值2，给局部变量y赋值2，输出的x和y的值都是2。函数调用返回后，窗体级的变量x的值为2，全局变量y的值依旧为1。
