以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  在系统菜单怎么写关闭当前窗口代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91742)

--  作者:cjl333333333
--  发布时间:2016/10/18 11:06:00
--  在系统菜单怎么写关闭当前窗口代码
请问在系统菜单怎么写关闭当前窗口代码
--  作者:有点蓝
--  发布时间:2016/10/18 11:11:00
--  
参考:http://www.foxtable.com/webhelp/scr/1547.htm
--  作者:cjl333333333
--  发布时间:2016/10/18 11:27:00
--  
谢谢,你能直接跟我写一下好吗,我知道在这里看得到,但不知如何写。


--  作者:有点蓝
--  发布时间:2016/10/18 11:57:00
--  
Dim frm As WinForm.Form = Forms.ActiveForm
If
 frm IsNot Nothing Then
    
frm.close
End
 
If
--  作者:cjl333333333
--  发布时间:2016/10/18 12:12:00
--  
非常感谢