Foxtable(狐表)用户栏目专家坐堂 → 我想在打开某窗口时,禁用所有的菜单


  共有10391人关注过本帖树形打印复制链接

主题:我想在打开某窗口时,禁用所有的菜单

帅哥哟,离线,有人找我吗?
wcs
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1034 积分:7402 威望:0 精华:0 注册:2008/8/31 22:52:00
我想在打开某窗口时,禁用所有的菜单  发帖心情 Post By:2011/2/23 21:59:00 [只看该作者]

菜单和快捷菜单是很方便,但是也给用户很多自主权,使程序达不到应有的效果

 

有时,我希望在打开某个窗口时,禁用所有的菜单,包括快捷菜单

 

不知代码如何写,给个思路吧?


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/2/24 8:47:00 [只看该作者]

For Each rb As RibbonMenu.Tab In RibbonTabs
    rb.Enabled = False
Next
For Each mu As RibbonMenu.ContextMenu In ContextMenus
    For Each it As RibbonMenu.ContextCommand In mu.Items
        it.Enabled = False
    Next
Next

 回到顶部
帅哥哟,离线,有人找我吗?
kylin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 F6
等级:狐精 帖子:3030 积分:19188 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2011/2/24 9:12:00 [只看该作者]

更绝一点, 用rb.Visible = False、 it.Visible = False代码,将会产生这样的结果:都看不见任何菜单包括右键菜单的痕迹。


 回到顶部
帅哥哟,离线,有人找我吗?
xiaoyunet
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:5 积分:102 威望:0 精华:0 注册:2012/3/13 22:24:00
  发帖心情 Post By:2012/3/15 0:42:00 [只看该作者]

那可以隐藏起来那些被禁用的灰色菜单嘛?? 有这语句嘛?? 


 回到顶部
帅哥哟,离线,有人找我吗?
xiaoyunet
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:5 积分:102 威望:0 精华:0 注册:2012/3/13 22:24:00
  发帖心情 Post By:2012/3/15 0:44:00 [只看该作者]

刚才试了一下。。被禁用的菜单项目打开后,再关闭。打开其他项目同样是被禁用的。呵呵。只有杀掉进程了。

 回到顶部