做不到，不过你可以用TimerTick，代码，比如
If Forms.ActiveForm Is Nothing OrElse Forms.ActiveForm.Name <> e.Form.Name Then e.Form.CloseEnd If
http://www.foxtable.com/help/topics/1322.htm
加好友 
发短信
Post By：2014/8/4 16:52:00 [显示全部帖子]
