- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问如何隐藏用户菜单中的命令？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97513)
-- 发布时间：2017/3/14 0:07:00
-- 请问如何隐藏用户菜单中的命令？
请问老师，如何根据登录用户的不同，隐藏用户菜单中的某一命令呢？
此主题相关图片如下：qq图片20170314000019.png
比如非开发者用户隐藏打印按钮
-- 发布时间：2017/3/14 8:43:00
--
相框：http://www.foxtable.com/webhelp/scr/2438.htm
-- 发布时间：2017/3/14 9:08:00
--
菜单系统事件LoadUserSetting加入如下代码没有效果：
Dim xt As RibbonMenu.Button = QAT.Items("系统").Items("系统菜单")
If User.Name <> "开发者" Then
xt.Visible = True
Else
xt.Visible = False
End If
请问老师,哪里错了呢？
[此贴子已经被作者于2017/3/14 9:09:31编辑过]
-- 发布时间：2017/3/14 9:20:00
--
运行有什么问题？
-- 发布时间：2017/3/14 9:43:00
--
系统毫无反应
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:即时库存表.rar |
-- 发布时间：2017/3/14 10:35:00
--
这个意思？
If User.Name <> "开发者" Then
xt.Visible = false
Else
xt.Visible = true
End If
-- 发布时间：2017/3/14 10:42:00
--
谢谢蓝老师！