7,763
社区成员
发帖
与我相关
我的任务
分享
Option Explicit
'*************************************************************************
'**模 块 名:ModQuit
'**说 明:退出程序时自动卸载所有窗口
'**创 建 人:嗷嗷叫的老马
'**日 期:2003年10月26日
'*************************************************************************
Public Sub Quit()
Dim X As Form
For Each X In Forms
Unload X
Next
End Sub
End'Form