求助：调用创建的子过程提示错误

cocopig

access在VBA代码编辑窗口的顶端创建了子过程，代码如下：

Public Sub MsgBoxShow(Msg As String, Title As String)

    Dim Response
    Response = MsgBox(Msg, vbOKOnly, Title)
   
    If Response = 0 Then
        Exit Sub
    End If
   
End Sub

然后在后面的代码中直接调用：
...................
    MsgBoxShow("aaa","bbb")
    exit sub
...................                    编译提示出错：缺少“=”，何解？？？？？？？？？？？

我编写好的过程应该怎样调用？另外，如果我把上述代码保存为模块，又该怎样调用呢？

andymark

call  MsgBoxShow("aaa","bbb")
或者
MsgBoxShow "aaa","bbb"

风中漫步

还是楼上手快,我改

cocopig

andymark 发表于 2012-7-6 16:15
call  MsgBoxShow("aaa","bbb")
或者
MsgBoxShow "aaa","bbb"

编译没再报错，谢谢。。。另请问：如果是调用模块就是要使用 call   那种方式吧？

andymark

上面2种方式法都行

cocopig

andymark 发表于 2012-7-6 16:36
上面2种方式法都行

今天我单独以上面的代码创建一个模块，用上述你所建议的两种方法调用，均显示过程未定义的错误，我是不是还缺了什么步骤没有做好呢？

andymark

请贴出模块完整的代码和调用的代码

cocopig

andymark 发表于 2012-7-7 20:07
请贴出模块完整的代码和调用的代码

Option Compare Database
Option Explicit

Public Sub MsgBoxShow(Msg As String, Title As String)

    'Dim Msg, Title As String
    Dim Response
   
    Response = MsgBox(Msg, vbOKOnly, Title)
   
    If Response = 0 Then
        Exit Sub
    End If
   
End Sub
--------------------------------
用以上代码新建模块，然后用call或msgboxshow ""都过提示编译错误。使用me.XXX系统也没有智能提示。但如果是创建过程则没有编译错误。