2

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.

2
  • Explique melhor o que você quer saber. Você quer controlar para que somente uma instância da aplicação seja aberta? Commented 8/09/2014 às 18:22
  • sanity-free.org/143/…
    – Tony
    Commented 8/09/2014 às 18:51

1 Resposta 1

1

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

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .