VB工程在调试时，点击菜单“退出”，怎么把工程也关了

Question

VB工程在调试时，点击菜单“退出”，怎么把工程也关了
工程结构是主窗体+子窗体结构的
部份代码如下：
Public Sub M2_退出系统_Click()
    Unload Me
End SubPrivate Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If MsgBox("确定要退出系统吗？", vbOKCancel + vbQuestion, "系统提示") = vbCancel Then
        Cancel = -1
    End If
End SubPrivate Sub MDIForm_Unload(Cancel As Integer)
    End
End Sub
现在问题是，我在调试时，点“退出系统”，则把工程也一起关闭了。有人知道原因吗？

Answer 1

程序意外终止，没什么奇怪的，我经常碰到。
你把这过程名 M2_退出系统_Click 改成英文名试一下。 

Answer 2

End 语句提供了一种强迫中止程序的方法。Visual Basic 程序正常结束应该卸载所有的窗体。只要没有其它程序引用该程序公共类模块创建的对象并无代码执行，程序将立即关闭。