Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > 综合其它

通用菜单引用不确定窗体命令

时 间:2007-11-24 16:43:33
作 者:咱家是猫   ID:85  城市:广州
摘 要:菜单引用不确定窗体模块中的命令.
正 文:

如果你的程序有一套通用的菜单,每个窗体都用这套菜单,但又希望不同的窗体中,菜单命令又有所不同,下面介绍一种方法.

在窗体模块中建立函数命令,注意,要用Public来定义.如:

Public Sub ReportPreview()

DoCmd.OpenReport SalesReport, acViewPreview, , "销售单ID =" & Me.销售单ID

End Sub
上面这段代码可以在如进货窗体,销售窗体,报订窗体....都建立,只不过打开的报表名称与参数各异.

在公共模块中写一个菜单命令

Function File_Preview()
'打印预览命令

On Error Resume Next

'引用当前窗体的打印预览命令

Call Screen.ActiveForm.ReportPreview

End Function


在自定义对话框打开的前掉下,在菜单命令的属性对话框的"所在操作"中填:

File_Preview

好了,这就对打印预览命令设置好了.

当你执行此菜单命令时,如果当前窗体有ReportPreview命令,就引用执行,如果没有,就不执行.

Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助