标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub TempSub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Command1 Click() Dim x As Integer Call TempSub x=x+100:y=y+100 Print x;y End Sub 运行程序后单
单选题
标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub TempSub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Command1 Click() Dim x As Integer Call TempSub x=x+100:y=y+100 Print x;y End Sub 运行程序后单