以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助菜单功能区按钮权限设置  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86719)

--  作者:小小小狐
--  发布时间:2016/6/23 18:29:00
--  求助菜单功能区按钮权限设置

If User.Type<>usertypeenum.developer Then
    RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = False
    RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = False
Else
    RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = True
    RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = True
End If

 

 

 

 

然后出来这个是什么意思??
图片点击可在新窗口打开查看此主题相关图片如下:未命名.bmp
图片点击可在新窗口打开查看


--  作者:大红袍
--  发布时间:2016/6/23 19:30:00
--  

If SystemMenu = False Then Return

 

If User.Type<>usertypeenum.developer Then
    RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = False
    RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = False
Else
    RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = True
    RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = True
End If


--  作者:小小小狐
--  发布时间:2016/6/23 22:10:00
--  非常感谢您!!
非常感谢您!!
--  作者:15177757041
--  发布时间:2017/8/30 21:50:00
--  
来学习
--  作者:花开的声音
--  发布时间:2017/8/31 9:25:00
--  
mark