问题
单项选择题
在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：
Public x as integer
Private Sub Command1 Click()
a=10
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1()
x=x+20
End Sub
Private Sub s2()
Dim x as integer
x=x+20
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是______。
A．10
B．30
C．40
D．50
答案
参考答案：B
解析： 本题使用Call调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于使用Dim...As关键字定义x，所以其值是模块范围的。在消息框中输出的值，是从子过程s2传回的值。