以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 快速访问栏 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114029) |
-- 作者:实话实说 -- 发布时间:2018/1/26 20:56:00 -- 快速访问栏 运行如下代码提示 \'快速访问栏菜单按钮是否可用 If _UserRole.Contains("管理员") OrElse _UserRole.Contains("临时管理") Then RibbonTabs("QAT")("系统管理")("显示表名").Enabled = True \'RibbonTabs("QAT")("系统管理")("隐藏表名").Enabled = True \'RibbonTabs("QAT")("系统管理")("系统菜单").Enabled = True Else RibbonTabs("QAT")("系统管理")("显示表名").Enabled = False \'RibbonTabs("QAT")("系统管理")("隐藏表名").Enabled = False \'RibbonTabs("QAT")("系统管理")("系统菜单").Enabled = False End If |
-- 作者:实话实说 -- 发布时间:2018/1/26 21:03:00 -- 应该? QAT("系统管理")("显示表名").Enabled = True
|
-- 作者:有点蓝 -- 发布时间:2018/1/26 21:22:00 -- 这种方式引用菜单:http://www.foxtable.com/webhelp/scr/1526.htm 另外如果是用户菜单,要切换到用户菜单模式测试代码
|