在 vb6 中加载表单，并在卸载时收到通知

Question

我希望 form1 加载 form2，当 form2 卸载时，卸载 form1。

我想尽量减少耦合，。

用例：我将 form1 作为半透明背景启动，以便更容易看到 form2。当 form2 卸载时，我希望 form1 也会卸载。我将在许多其他"form2"类型表单中重用此代码。

我已经考虑了地址运算符。希望更简单的东西。

Answer 1

如果以模式显示 form2，则可以在 show 方法返回后卸载 form1：

在 form1 中，其中显示 form2：

Form2.Show vbModal
Unload Me

或者，如果您没有以模式显示 form2，则可以在 form2 的卸载事件中卸载 form1：

Private Sub Form_Unload(Cancel As Integer)
  Unload Form1
End Sub