以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  我想在打开某窗口时，禁用所有的菜单  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9122)
--  作者：wcs
--  发布时间：2011/2/23 21:59:00
--  我想在打开某窗口时，禁用所有的菜单

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

 

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

 

不知代码如何写，给个思路吧？
--  作者：狐狸爸爸
--  发布时间：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
--  发布时间：2011/2/24 9:12:00
--  
更绝一点， 用rb.Visible = False、 it.Visible = False代码，将会产生这样的结果：都看不见任何菜单包括右键菜单的痕迹。
--  作者：xiaoyunet
--  发布时间：2012/3/15 0:42:00
--  

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

--  作者：xiaoyunet
--  发布时间：2012/3/15 0:44:00
--  
刚才试了一下。。被禁用的菜单项目打开后，再关闭。打开其他项目同样是被禁用的。呵呵。只有杀掉进程了。