为什么Sub Form的'x'关闭按钮事件关闭了VBA Main窗体？

Question

嘿所以我正在使用VBA中的某些表单，并且遇到了一些问题。我从主窗体打开其他窗体，但是当我使用红色的“x”按钮退出其他窗体时，它也会关闭我的主窗体，而不仅仅是其他窗体。

我该如何预防？

Answer 1

您应该使用仅关闭子窗体的代码。

例如你的子窗体名称是SubForm1

DoCmd.Close acForm, "SubForm1" 

但因为你正在使用的X按钮关闭子窗体，您可以使用QueryClose事件。

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) 
    If CloseMode = 0 Then 
    Cancel = True 
    End if 
End Sub 

PS：如果你可以通过编辑你的问题发布你的代码很有帮助。