以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  我想在打开某窗口时,禁用所有的菜单  (http://www.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
--  
刚才试了一下。。被禁用的菜单项目打开后,再关闭。打开其他项目同样是被禁用的。呵呵。只有杀掉进程了。