以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  功能区的设置  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178019)

--  作者:zhangchi96
--  发布时间:2022/6/15 8:46:00
--  功能区的设置
1.目标:主菜单设置中,添加了多个功能区,通过表中的某行某列的数值,来决定功能区1、与功能区2等功能区在启动后是否显示给用户看到

2.做法:在aft/eropenpr/oject中设置了

Dim cm/d As New SQ/LCo/mm/and
cm/d.Co/nn/ectio/nName = "数据库名"
cm/d.Co/mma/ndText ="Se/lect Co/unt(*) Fro/m {单位列表} Where 年度 = "& Vars("年度") &" and 奖补_功能菜单_可见 = 1 "
cm/d.Ex/ec/uteS/calar()
If cm/d.Exe/cuteSc/alar() > 0 Then 
        RibbonTabs("奖励补贴").Visible = True
Else
        RibbonTabs("奖励补贴").Visible = False
End If

3.问题。在“奖励补贴”的功能区被判断为不可见后,重新启动,会提示没有发现“奖励补贴”功能区,以后即使按照判断,为可见此功能区,但事实也无法显示。

敬请老师不吝指教!


--  作者:有点蓝
--  发布时间:2022/6/15 9:18:00
--  
代码没有问题,自己做的菜单要切换到自定义菜单模式才能使用
--  作者:zhangchi96
--  发布时间:2022/6/15 9:50:00
--  
是自定义的菜单,隐藏自定义的菜单是成功的,但有时从隐藏改为显示,系统提示没有这个功能区,或者也不提示,但就不能显示
--  作者:有点蓝
--  发布时间:2022/6/15 9:57:00
--  
请上传实例说明