以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何使用以下代码实现不同用户是隐藏 “SAVE”按钮  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17706)
--  作者：sanyotaiyo
--  发布时间：2012/3/21 18:43:00
--  如何使用以下代码实现不同用户是隐藏 “SAVE”按钮

如何使用以下代码实现不同用户是隐藏“SAVE”按钮。
Select User.Name
Case "OtherUser","公共用户" 
    RibbonTabs("Quick").Groups("???").Items("save").Enabled = False
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = False
Case Else
    RibbonTabs("Table").Visible = True
    RibbonTabs("Project").Visible = True
    RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = True
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = True
End Select

 

其中关于菜单中Groups、Items名称的标准英文那里用对照表？

 

以上请指点。

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:快速启动中得 save 按钮隐藏.xls

[此贴子已经被作者于2012-3-22 8:07:47编辑过]
--  作者：czy
--  发布时间：2012/3/21 18:48:00
--  
RibbonTabs("Quick").Groups("???").Items("save").Visible = False \'这是隐藏
--  作者：程兴刚
--  发布时间：2012/3/21 19:08:00
--  
RibbonTabs("Quick").Groups("???").Items("save").Enabled = (user.name = "张三"） \'当前登录用户为张三时，显示菜单中的save按钮
--  作者：sanyotaiyo
--  发布时间：2012/3/22 8:12:00
--  

谢谢各位的指点，我的意思是其中的？？？有没有对照表？快速按钮中得SAVE这么隐藏？谢谢！

 

RibbonTabs("???").Groups("???").Items("???").Enabled

--  作者：狐狸爸爸
--  发布时间：2012/3/22 8:58:00
--  

看看这里的属性说明：

 

http://www.foxtable.com/help/topics/1100.htm

 

还有：

http://www.foxtable.com/help/topics/1526.htm

 

[此贴子已经被作者于2012-3-22 8:58:08编辑过]