Vba 如果我关闭了Form2,如何关闭Form1?

Vba 如果我关闭了Form2,如何关闭Form1?,vba,formclosing,Vba,Formclosing,当我关闭Form2时,Form1仍在后台运行,调试没有停止。我在Form1中有一个按钮,它打开Form2并使Form1不可见 有没有一个简单的解决方案,在我关闭Form2时关闭Form1,然后关闭整个程序?(在Form2中没有任何按钮)您调用应用程序。关闭Form2时退出。 如果您使用的是用户表单: Private Sub UserForm_Terminate() Application.Quit End Sub 如果您使用的是访问表单: 'Close event on Form2 P

当我关闭Form2时,Form1仍在后台运行,调试没有停止。我在Form1中有一个按钮,它打开Form2并使Form1不可见


有没有一个简单的解决方案,在我关闭Form2时关闭Form1,然后关闭整个程序?(在Form2中没有任何按钮)

您调用
应用程序。关闭Form2时退出。
如果您使用的是用户表单:

Private Sub UserForm_Terminate()
    Application.Quit
End Sub
如果您使用的是访问表单:

'Close event on Form2
Private Sub Form_Close()
    DoCmd.Close acForm, "Form1", acSaveNo
    Application.Quit
End Sub

请注意,
Application.Quit
将真正退出应用程序。如果您只想关闭表单,请改用
卸载表单1
(也可在这些代码块中调用)。

您使用的是Windows表单吗?如果是这样,您可以挂接到Form2的Form.Closed或Form.Closing事件,并在相应的事件处理程序中关闭程序。
Unload Form1
应该可以做到这一点,但是如果您仍要关闭整个应用程序,那么也应该自动关闭所有表单。但是我从哪里调用它呢?我把它放在哪里?我编辑了我的回复。您可能只想使用DoCmd(如果您正在使用Access),而不想使用应用程序。退出,这将关闭所有内容。