checking if the form is opened or not

[almaha]

Hi
I have question regarding how i can check if the form is opened or not ??

 

[kulrom]

Try this:

        For Each form As Form In My.Application.OpenForms
            If form Is My.Forms.FormYouCheck Then
                'do something (it's open)
            End If
        Next

 

[Budius]

every once in a while I also need that.
Most my projects I do what kulrom suggested but in a function:

    Public Function IsFormOpen(ByVal FormName As String) As Boolean
        Dim frm As Form

        IsFormOpen = False

        For Each frm In My.Application.OpenForms
            If frm.Name = FormName Then
                IsFormOpen = True
                Exit For
            End If
        Next
    End Function