Como verifico se uma janela foi aberta? Caso tenha sido aberta, trazer-la para frente, caso contrario, abrir uma nova janela. Ou seja, necessito controlar as janelas, verificando-as para que somente uma esteja aberta.
1 Resposta
Fácil. No evento onde está neste momento a abrir a janela, coloque a seguinte condição:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim fEncontrou As Boolean = False
For Each f As Form In Application.OpenForms
If f.Name = "Form2" Then
fEncontrou = True
f.BringToFront()
f.Activate()
Exit For
End If
Next
If Not fEncontrou Then Form2.Show()
End Sub