Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]设置了 销售经理菜单不可见 怎么没用!

1楼
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
这部分没用 什么情况

 

2楼
狐狸爸爸 发表于: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

3楼
gaoyong30000 发表于:2011/9/11 15:09:00

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

能解释下嘛

 

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

共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .07422 s, 2 queries.