以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让功能组最小化  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=118546)
--  作者：zhutangxin
--  发布时间：2018/5/5 11:45:00
--  如何让功能组最小化
老师您好，
程序启动后，如何让功能组最小化。我在登录确定按钮中放了下面的代码， 没起到效果，但程序启动后，切换用户，是起作用的。

RibbonTabs.AllowMinimize = True
RibbonTabs.Minimized = True
--  作者：有点蓝
--  发布时间：2018/5/5 11:53:00
--  
添加一个计划管理，写代码

RibbonTabs.AllowMinimize = True
RibbonTabs.Minimized = True
MyTimers("计划1").Enabled = False
--  作者：zhutangxin
--  发布时间：2018/5/5 12:14:00
--  
MyTimers("计划1").Enabled = False 如果放在计划中，则打开的时候不起作用，如果去掉，则可。

问题是MyTimers("计划1").Enabled = False应该放在哪？目的只是启动的时候，最小化，后面如果用户最大化，那设计一个按钮给用户，不能再让该计划任务再执行了。
--  作者：zhutangxin
--  发布时间：2018/5/5 12:49:00
--  
改成这样就可以了
RibbonTabs.AllowMinimize = True
RibbonTabs.Minimized = True
MyTimers("功能组最小化").Enabled = Not RibbonTabs.Minimized