以文本方式查看主题

-  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=75804)
--  作者：mxm121
--  发布时间：2015/10/15 10:53:00
--  请问如何实现点击独立窗口外的区域，独立窗口关闭
如题  谢谢
[此贴子已经被作者于2015/10/15 10:53:13编辑过]
--  作者：大红袍
--  发布时间：2015/10/15 10:56:00
--  

窗口弄一个计时器，写代码

 

If Forms.ActiveForm Is Nothing OrElse Forms.ActiveForm.Name <> e.Form.Name Then

   e.Form.Close

End If

 

http://www.foxtable.com/help/topics/1301.htm