以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让停靠窗口不能隐藏起来，包括自动和手动隐藏  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79260)
--  作者：erdbeer
--  发布时间：2015/12/27 23:49:00
--  如何让停靠窗口不能隐藏起来，包括自动和手动隐藏

如何让停靠窗口不能隐藏起来，包括自动和手动隐藏？

代码怎么写？

 

谢谢！
--  作者：Hyphen
--  发布时间：2015/12/28 8:56:00
--  
增加个全局变量

窗口BeforeClose事件

if vars("不能关闭") then
e.Cancel = True
end if
--  作者：大红袍
--  发布时间：2015/12/28 9:20:00
--  

参考代码

 

dim frm = forms("窗口1").panel.parent.parent
frm.CanAutoHide = false