在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub s(ByVal p As Integer) p=p*2 End Sub Private Sub Command1_Click(

admin2009-01-19  33

问题 在窗体中添加一个名称为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
   窗体打开运行后,单击命令按钮,则消息框的输出结果为  【  】  。

选项

答案3

解析 在此题中,使用了Private对SUB过程s中的变量p进行了声明,表示该变量的作用域只是在该SUB过程中,并不影响调用其的过程中变量的值,所以,当i赋值为3时,调用SUB过程s,在该SUB过程中,变量p值被赋值为6,但返回调用的过程后,i值仍然为3,不满足If条件语句的判断条件,所以,显示的i值仍然为3。
转载请注明原文地址:https://jikaoti.com/ti/fKc0FFFM
0

最新回复(0)