- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [原创]如何在自己的系统中，根据情况关闭系统菜单和显示系统菜单？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=66622)
-- 发布时间：2015/4/10 17:05:00
-- [原创]如何在自己的系统中，根据情况关闭系统菜单和显示系统菜单？
版主：
将系统菜单加到自己开发的系统后，想在关闭系统菜单的时候关闭它，想在打开的时候，显示它，代码如何写？
谢谢了。
版主：发帖子时，提示错误信息：请输入投票内容。在哪里输入投票内容呢？界面上好像不容易找到。
-- 发布时间：2015/4/10 17:08:00
--
不要发起投票,直接发布主题
切换系统菜单用快捷键 CTRL+SHIFT+F12
-- 发布时间：2015/4/10 17:24:00
--
版主：
我没有说清楚，我的菜单中，既有系统菜单，又有自己定义的菜单，有的时候，想关闭系统菜单，在关闭后，还想在某时，显示系统菜单。
与您给出的方法不是一码事，不知道我是否说清楚了。
-- 发布时间：2015/4/10 17:25:00
--
不明白,菜单是不可能同时存在自定义和系统菜单的
-- 发布时间：2015/4/10 17:30:00
--
版主：
我把系统菜单和我自己定义的菜单都放在一起了。如下图所示。
此主题相关图片如下：qq截图20150410172705.png
从中可以看出，前面五个菜单项是系统菜单，后面第六项日常工作、系统管理和快捷查询，是我自己定义菜单。
我希望按下某个快捷键关闭系统菜单，然后再按下某个快捷键，显示系统菜单。
-- 发布时间：2015/4/10 17:47:00
--
我很希望有一个与Syscmd.Project.OpenSystemMenu()对应的系统命令：Syscmd.Project.CloseSystemMenu()，不知道有没有？
如果有，我就能实现我的想法了。
另外，在菜单系统中，如何设置快捷键。
-- 发布时间：2015/4/13 10:32:00
--
最终解决办法找到了：
需要关闭时，设置为隐藏，需要显示时，设置为可见。
设置为隐藏的语句如下：
RibbonTabs("Common").Visible = False \'关闭系统菜单中的common菜单(日常工作)
RibbonTabs("Table").Visible = False \'关闭系统菜单中的Table菜单(数据表)
RibbonTabs("Project").Visible = False \'关闭系统菜单中的Project菜单(管理项目)
RibbonTabs("Print").Visible = False \'关闭系统菜单中的Print菜单(打印输出)
RibbonTabs("Other").Visible = False \'关闭系统菜单中的Other菜单(杂项)