VB中如何重新打开已释放的窗体？解决Form2关闭后无法再次打开问题

你的代码问题在于类级别声明的Form2实例在关闭后会被自动释放，再次调用Show()时，这个实例已经无效，导致无法打开。以下是几种可行的解决方案：

方案1：每次点击创建新窗体实例 #

将窗体实例的创建移到按钮点击事件内部，每次点击都生成新的Form2对象，关闭后旧实例被释放，下次点击重新创建全新窗体。

Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click
    Dim newForm2 As New Form2
    newForm2.Show()
End Sub

适用场景：不需要保留Form2的操作状态，每次打开都是空白新窗体。

方案2：检查实例状态，按需重新创建 #

在类级别保留窗体变量，但仅在实例为空或已释放时重新创建，避免重复创建实例（如果窗体只是隐藏未关闭，直接显示）。

Private Form2 As Form2 ' 仅声明变量，不初始化

Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click
    ' 判断窗体是否已被释放或未创建
    If Form2 Is Nothing OrElse Form2.IsDisposed Then
        Form2 = New Form2
    End If
    Form2.Show()
End Sub

适用场景：希望在窗体未关闭时复用实例，关闭后再重新创建新实例。

方案3：关闭时隐藏窗体，避免释放 #

修改Form2的关闭行为，将“关闭”改为“隐藏”，这样窗体实例不会被释放，下次调用Show()可直接恢复显示，同时保留之前的操作状态。

首先在Form2中添加FormClosing事件处理：

Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    ' 取消关闭操作，改为隐藏窗体
    e.Cancel = True
    Me.Hide()
End Sub

然后Form1的按钮代码保持你的原有逻辑即可：

Dim Form2 As New Form2

Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click
    Form2.Show()
End Sub

适用场景：需要保留Form2的所有操作状态，关闭后再次打开能恢复之前的内容。

内容的提问来源于stack exchange，提问作者Bailey Nygard