Office中国论坛/Access中国论坛

标题: Access不编程生成菜单，自定义菜单如何调用自定义过程 [打印本页]

作者: cqw 时间: 2006-7-5 23:41
标题: Access不编程生成菜单，自定义菜单如何调用自定义过程
Access不编程生成菜单，自定义菜单如何调用自定义过程

1.工具 -> 自定义 -> 工具栏 -> 新建 -> 将生成的工具栏"自定义1"选中 -> 属性 -> 将类型改为"菜单栏"，其"工具栏名称"也可以改为其它名子，点击"关闭"

2.选择 "自定义" 框中的命令->文件->自定义，将其拖至"自定义1"菜单栏（可反复拖取）->选取"自定义1"菜单栏中的某个菜单，单击右键，选"属性"，可以更改菜单名"标题"，"所在操作"中填宏或function函数（其格式为“=FunctionName()”，注意，“=FunctionName()” 的两个括号不能少）。然后关闭对话框。

3.将所有的菜单都设置完后，再次选取"自定义"对话框中的"自定义1"菜单栏->选"属性"->将其"类型"改为"弹出式"。确定。

4.选取"自定义"->"工具栏"->"快捷菜单"，勾取。可在出现的[快捷菜单]栏中看到"自定义"项，我们定义的快捷菜单就在内。可选取，单击右键，选"属性"，更改其相应的属性。

5.在需要的地方，如下写码：
CommandBars("自定义1").Controls(2).Enabled =True
'定义其某个菜单是否可用。需要时再加。
CommandBars("自定义1").ShowPopup
'弹出快捷菜单

如果"工具栏名称"为"右键菜单"，则可写为：
CommandBars("右键菜单").Controls(2).Enabled =True
CommandBars("右键菜单").ShowPopup

作者: fan0217 时间: 2006-7-6 00:55
cqw今天刚来，就发了不少好东东，谢谢！

作者: duguoliang 时间: 2006-7-6 02:23
不错支持

作者: 行云 时间: 2006-7-6 06:11
最好能提供个样板，哪就更好了

作者: nxjswt 时间: 2006-7-6 06:20
[em02]侠客发标

作者: slhy 时间: 2006-8-5 14:06
Thank you very much!

作者: ddssaa 时间: 2006-8-10 18:10
收下看

作者: yangzn 时间: 2006-8-10 21:21
这种菜单的图标,有没有好的编辑方法? (Acess的菜单图标,个人感觉不好编辑)

作者: bdchx 时间: 2007-1-9 03:57
谢谢分享！

作者: huangxiuwen 时间: 2008-4-14 20:36
关注...........................

作者: bach 时间: 2008-4-14 20:56
我用的是英文版,找不着对应的菜单啊.[:30]
比如,工具 -> 自定义 -> 工具栏 -> 新建 -> 将生成的工具栏"自定义1"选中 -> 属性 -> 将类型改为"菜单栏"，其"工具栏名称"也可以改为其它名子，点击"关闭"

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)