| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 菜单隐藏和显示问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64867) |
| -- 作者：998168 -- 发布时间：2015/3/4 4:49:00 -- 菜单隐藏和显示问题 如下代码： If User.Name = "张三" Then RibbonTabs("Table").Groups("Table").Visible = False \'菜单项一 ElseIf User.Name = "管理员" Then RibbonTabs("Project").Groups("Project").Visible = False \'菜单项二 End If 切换到“张三”后，菜单项一隐藏没错，再切换到管理员，菜单项二隐藏也没错， 问题来了，之前的菜单项一也隐藏了，再切换回到张三时菜单项一和二都隐藏了， 令我疑虑的是菜单的显示与否不是继成项目的吗，也就是说张三应该可看到菜单 项二，而管理员应该可看到菜单项一啊！因为对于项目来说菜单项一和二始终设置 成显示的，并没有隐藏啊！
|
| -- 作者：Bin -- 发布时间：2015/3/4 8:37:00 -- RibbonTabs("Table").Groups("Table").Visible = True\'菜单项一 RibbonTabs("Project").Groups("Project").Visible = True\'菜单项二 If User.Name = "张三" Then RibbonTabs("Table").Groups("Table").Visible = False \'菜单项一 ElseIf User.Name = "管理员" Then RibbonTabs("Project").Groups("Project").Visible = False \'菜单项二 End If
|