窗体关闭按钮，进程不能结束解决方案

窗体关闭按钮，进程不能结束
请教各位，VB的MDI窗体点了关闭按钮之后，程序关闭，但任务管理器中进程仍然存在，如果用Unload   me就能正常结束程序，请问如何点击关闭按钮时达到和Unload   Me   一样的效果，望解答，谢谢！！

[解决办法]
以下内容保存为 "ModQuit.bas ":

Attribute VB_Name = "ModQuit "
'*************************************************************************
'**模 块 名：ModQuit
'**说 明：退出程序时自动卸载所有窗口
'**创 建 人：马大哈
'**日 期：2003年10月26日
'*************************************************************************
Option Explicit

Public Sub Quit()
Dim X As Form
For Each X In Forms
Unload X
Next
End
End Sub

原因大概是你的工程还有其它窗体没有卸载吧.....

添加这个模块到工程,在你的MDI主窗体的UNLOAD事件里,调用QUIT()函数就可以了
[解决办法]
直接再 主窗体得 form unload里写

END


肯定就都退出了 不管是窗体 还是变量
[解决办法]
Form_QueryUnload事件里 end
[解决办法]
使用end来结束程序应该不会存在你说的问题。
Private Sub MDIForm_Unload(Cancel As Integer)
End
End Sub
[解决办法]
反对直接写end

如果在与硬件相关的进程中，直接end 不仅仅关不掉，而且会造成非法

检查所有的数据集。连接，sock相关一切是否都关闭完

再如2楼去遍历每个窗体，最后在Terminate中再去end
[解决办法]
Option Explicit

Public Sub Quit()
Dim X As Form
For Each X In Forms
Unload X
Next
End
End Sub