none
Как определить открыта ли Форма ? VB Net RRS feed

  • Вопрос

  • Как определить открыта ли Форма в данный момент и если открыта закрыть её ?

    Пример кода желательно ,если не трудно всем спасибо.

    • Перемещено SachinW 1 октября 2010 г. 21:21 MSDN Forums Consolidation (От:Начинающие разработчики)
    5 сентября 2010 г. 11:11

Ответы

  • Private Sub Button2_Click(ByVal sender As System.Object,
        ByVal e As System.EventArgs) Handles Button2.Click
        OpenFormClose()
      End Sub
    
      Private Sub OpenFormClose()
        Try
          For Each f As Form In My.Application.OpenForms
            If Not f.InvokeRequired Then
         ''''Перечисляем все открытые формы приложения
              MessageBox.Show(f.Text)
          ''''Можно получить доступ к форме непосредственно
              If f.Text <> "Form1" Then
                f.Hide() 'Cкрываем Все откр формы кроме Form1
              End If
            End If
          Next
        Catch ex As Exception
          MessageBox.Show("Error: " & ex.Message)
        End Try
      End Sub
    
    • Помечено в качестве ответа I.Vorontsov 16 сентября 2010 г. 6:59
    9 сентября 2010 г. 7:28

Все ответы

  • Здесь описан способ определения.
    8 сентября 2010 г. 12:25
  • Private Sub Button2_Click(ByVal sender As System.Object,
        ByVal e As System.EventArgs) Handles Button2.Click
        OpenFormClose()
      End Sub
    
      Private Sub OpenFormClose()
        Try
          For Each f As Form In My.Application.OpenForms
            If Not f.InvokeRequired Then
         ''''Перечисляем все открытые формы приложения
              MessageBox.Show(f.Text)
          ''''Можно получить доступ к форме непосредственно
              If f.Text <> "Form1" Then
                f.Hide() 'Cкрываем Все откр формы кроме Form1
              End If
            End If
          Next
        Catch ex As Exception
          MessageBox.Show("Error: " & ex.Message)
        End Try
      End Sub
    
    • Помечено в качестве ответа I.Vorontsov 16 сентября 2010 г. 6:59
    9 сентября 2010 г. 7:28