vb.net - 检查表单是否已打开

Question

我给这个问题更多的知识。我怎么知道表单是否在我的应用程序中打开，为了不再打开它，我的意思是不要在运行时创建相同表单的实例

   Dim frmCollection As New FormCollection()
    frmCollection = Application.OpenForms()
    If frmCollection.Item("Form2").IsHandleCreated Then
        MsgBox("Yes Opened")
    Else
        Dim f As New Form2()
        With f
            .Text = "form2"
            .Show()
        End With
    End If

如果我多次执行此代码，它将创建表单 Form2 的更多实例
如何检查此表单是否尚未打开

Answer 1

你可以这样试试:

 Imports System.Linq ' need to add 


If Application.OpenForms().OfType(Of Form2).Any Then
  MessageBox.Show("Opened")
Else
  Dim f2 As New Form2
  f2.Text = "form2"
  f2.Show()
End If