以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何针对不同的人,弹出的快捷菜单,显示不同的选项?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145430)

--  作者:ycwk
--  发布时间:2020/1/19 14:49:00
--  如何针对不同的人,弹出的快捷菜单,显示不同的选项?
如题
--  作者:有点蓝
--  发布时间:2020/1/19 14:54:00
--  
参考:http://www.foxtable.com/webhelp/topics/0662.htm
--  作者:ycwk
--  发布时间:2020/1/19 15:13:00
--  
除了新建一组菜单,没有别的办法?
--  作者:有点蓝
--  发布时间:2020/1/19 15:33:00
--  
系统默认菜单都一样可以,测试过吗?

If e.HitType = HitTypeEnum.Cell Then
    If user.Type = UserTypeEnum.Developer
        ContextMenus("Cell").Items("Filter").Visible = False
        ContextMenus("Cell").Items("Select").Visible = True
    Else
        ContextMenus("Cell").Items("Select").Visible = False
        ContextMenus("Cell").Items("Filter").Visible = True
    End If
    
    e.ContextMenu = ContextMenus("Cell")
End If