- 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=145890)
-- 发布时间：2020/2/10 21:52:00
-- [求助]区能区隐藏的问题
菜单功能区”商品车保险管理“可见设置为false ，区内的功能组可见均为true。
在导航窗口中设置一个按钮键，代码为：
RibbonTabs("商品车保险管理").Selected = True
RibbonTabs("商品车保险管理").Visible = True
MainTable = Tables("商品车保险")
点击后此按钮后：功能区标题可见。但功能区中的项目却不可见。感觉像被挡住了
请老师指导
-- 发布时间：2020/2/10 21:56:00
--
是不是功能区中的项目也被隐藏了？使用代码显示看看
RibbonTabs("商品车保险管理").Groups("某项目").Visible = True
-- 发布时间：2020/2/10 22:03:00
--
还是只是显示功能区标题，其他的都不显示
-- 发布时间：2020/2/10 22:14:00
--
我测试这个用法没有问题呀。上传实例说明
-- 发布时间：2020/2/11 8:12:00
-- [求助]区能区隐藏的问题
已上传
[此贴子已经被作者于2020/2/11 8:40:07编辑过]
-- 发布时间：2020/2/11 8:37:00
--
文件上传方法：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78
如果上传出错，重复试几次，直到成功
-- 发布时间：2020/2/11 12:24:00
--
已上传
-- 发布时间：2020/2/11 12:25:00
--
上传
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:物流系统-演示2.table |
-- 发布时间：2020/2/11 13:31:00
--
导航控件，TopicLinkClick事件，先设置显示，在设置选择，先后顺序不对
Select Case e.Link.Text
Case "运次借款"
Dim A As RibbonMenu.Tab = RibbonTabs("运次借款")
A.Visible = True
A.Selected = True
MainTable = Tables("运次借款")
Case "运输车保险管理"
RibbonTabs("运输车保险管理").Visible = True
RibbonTabs("运输车保险管理").Selected = True
……
菜单设计
各个功能区的DeselectTab事件：
e.Tab.Visible = False
如果功能区的用法都一样，不需要在各个功能区处理，直接在主菜单全局DeselectTab事件处理即可：
e.Sender.Visible = False
-- 发布时间：2020/2/11 14:21:00
--
谢老师