以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]设置了 销售经理菜单不可见 怎么没用!  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=12683)

--  作者:gaoyong30000
--  发布时间:2011/9/11 12:41:00
--  [求助]设置了 销售经理菜单不可见 怎么没用!

If User.Name <> "季萍" And User.Name <> "开发者"
    RibbonTabs("功能区1").Visible = False
ElseIf User.Name = "季萍"
    RibbonTabs("功能区2").Visible = False
ElseIf user.name = "销售经理"
    RibbonTabs("功能区2")("功能组2")("申请修改").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请删除").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请战胜").Visible = False
    RibbonTabs("功能区2")("功能组2")("分割条1").Visible = False
End If

 

 

 

 

 

 

   RibbonTabs("功能区2")("功能组2")("申请修改").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请删除").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请战胜").Visible = False
    RibbonTabs("功能区2")("功能组2")("分割条1").Visible = False
这部分没用 什么情况

 


--  作者:狐狸爸爸
--  发布时间:2011/9/11 13:08:00
--  

If User.Name <> "季萍" And User.Name <> "开发者"
    RibbonTabs("功能区1").Visible = False
End If
If User.Name = "季萍"
    RibbonTabs("功能区2").Visible = False
ElseIf user.name = "销售经理"
    RibbonTabs("功能区2")("功能组2")("申请修改").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请删除").Visible = False
    RibbonTabs("功能区2")("功能组2")("申请战胜").Visible = False
    RibbonTabs("功能区2")("功能组2")("分割条1").Visible = False
End If


--  作者:gaoyong30000
--  发布时间:2011/9/11 15:09:00
--  

为什么你的就行 我的不行额。。?

能解释下嘛

 

另外,我的标准按钮标题是 申请xx      在代码里用标题 就会出错说不存在  难道非要用 标准按钮x   才行?