问题
填空题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Command1_Click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为 【12】 。
答案
参考答案:C
解析: 在此题中,使用了Private对SUB过程s中的变量p进行了声明,表示该变量的作用域只是在该SUB过程中,并不影响调用其的过程中变量的值,所以,当i赋值为3时,调用SUB过程s,在该SUB过程中,变量p值被赋值为6,但返回调用的过程后,i值仍然为3,不满足If条件语句的判断条件,所以,显示的i值仍然为3。