MDI主窗体和子窗体问题

Question

图1 一个MDI主窗体，红色部分是子窗体，我打开的位置设定在那里，现在出现一个问题，当我关闭主窗体时，会出现如下图提示就是关闭主窗体时会提示要不要关闭，这时候，为什么红色部分的子窗体会关闭掉呢？我的意思是，这一步时子窗体不自动关闭，因为有可能选择不关闭主窗体。求解

Answer 1

写在 Query_Unload() 看看。

Answer 2

Sub Form_QueryUnload(Cancel As Boolean)
    If MsgBox("是否关闭", VbYesNo) = VbNo Then
        Cancel = True
    End If
End Sub

Answer 3

放到子窗体里面
Sub Form_QueryUnload(Cancel As Boolean)
    If MsgBox("是否关闭", VbYesNo) = VbNo Then
        Cancel = True
    End If
End Sub