求助：如何调用模块的代码

cocopig · 发表于 2012-7-19 20:11:22

本帖最后由 cocopig 于 2012-7-19 20:15 编辑

新建模块并以msgbox为基础写了一段代码，怎样在VBA代码编写中调用呢？直接打me.xxxxxx或call xxxx编译都出错。

模块代码如下：
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

求教正确编写和调用代码方法。。谢谢。

todaynew · 发表于 2012-7-19 20:30:36

call MsgBoxShow("aa","ss")
或者
MsgBoxShow "aa","ss"

cocopig · 发表于 2012-7-20 10:11:40

todaynew 发表于 2012-7-19 20:30
call MsgBoxShow("aa","ss")
或者
MsgBoxShow "aa","ss"

还是不行，是不是还差点什么？？？？？

老鬼 · 发表于 2012-7-20 10:36:26

别把函数跟模块名称都叫MsgBoxShow

cocopig · 发表于 2012-7-20 16:24:44

老鬼发表于 2012-7-20 10:36
别把函数跟模块名称都叫MsgBoxShow

测试有效，谢谢帮忙.......

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 求助：如何调用模块的代码

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)