none
SABER SI UN FORMALARIO ESTA ABIERTO O CERRADO RRS feed

Respuestas

  • Hola, Juan:

    La colección OpenForms te indica los formularios que actualmente se encuentran abiertos:

        Public Function IsFormOpen(ByVal formName As String) As Boolean

            ' Recorremos la colección de formularios
            ' actualmente abiertos.
            '
            For Each frm As Form In My.Application.OpenForms

                If (frm.Name.ToLower() = formName.ToLower()) Then _
                    Return True

            Next

            Return False

        End Function

    Para saber si un formulario concreto se encuentra abierto, llamarías a la función de la siguiente manera:

        Dim bln As Boolen = IsFormOpen("Form234")

    El valor de la variable «bln» te indicará si está abierto (True) o no (False).

    Un saludo


    Enrique Martínez [MS MVP - VB]
    domingo, 17 de octubre de 2010 7:18
    Moderador