主题：请问如何隐藏用户菜单中的命令？

请问老师，如何根据登录用户的不同，隐藏用户菜单中的某一命令呢？
此主题相关图片如下：qq图片20170314000019.png

比如非开发者用户隐藏打印按钮

相框：http://www.foxtable.com/webhelp/scr/2438.htm

 

菜单系统事件LoadUserSetting加入如下代码没有效果：

Dim xt As RibbonMenu.Button = QAT.Items("系统").Items("系统菜单")
If User.Name <> "开发者" Then
 xt.Visible = True
Else
 xt.Visible = False
End If

请问老师,哪里错了呢？

运行有什么问题？

系统毫无反应

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:即时库存表.rar

这个意思？

 

If User.Name <> "开发者" Then
 xt.Visible = false
Else
 xt.Visible = true
End If

谢谢蓝老师！