CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Cerrar Un Form A Travez De Codigo

(1/1)

Vortice:
Camaradas, espero y estén bien y puedan echarme una mano….

Lo que necesito yo lo veo simple, pero no es tan simple parece…

Tengo una aplicación con diversos formularios y un form padre.

Cuando llamo a un form x lo hago así

Dim form_X as new form_Z
Form _X.show()

Lo que yo quiero es q al hacer esto los form’s q estén abiertos detrás de este nuevo form q voy abrir se cierren, excepto el form padre, lo he intentado así.

Form_anterior.close()
Form_anterior.hide()

Dim form_X as new form_Z
Form _X.show()

Y el form_anterior no lo cierra a q se deberá esto, espero puedan ayudarme camaradas….

De antemano gracias.

aghsoft:
haz un recorrido por los fomularios abiertos por la aplicacion y cierra los que no te interese

Vortice:
gracias.....

por tu aporte

wolf9845:
mira yo tengo algo asi  estoy utilizando una MDI  y para cerrar ocupo este metodo


--- Código: Text --- Private Sub ismSesionCerrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ismSesionCerrar.Click        If MsgBox("Todas las ventanas se cerrarán" + vbCrLf + "Guarde todos sus cambios" + vbCrLf + vbCrLf + "¿DESEA CERRAR SESIÓN?", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "CERRAR SESIÓN") = MsgBoxResult.Yes Then            'CERRAMOS TODOS LOS MDIS ABIERTOS UNO POR UNO.            Dim i As Integer            For i = Me.MdiChildren.Length - 1 To 0 Step -1                Me.MdiChildren(i).Close()            Next            'SE CIERRA ALGUNA OTRA FORMA QUE SE ENCUENTRE ABIERTA.            FrmActDesHumano.Close()            FrmAlumno.Close()            FrmAsignatura.Close()            FrmCapacitacion.Close()             FrmDocente.Close()             FrmInstitucionServicioMedico.Close()            FrmTarifasConceptoDePago.Close()            FrmUsuarios.Close()             DesactivarMenu()            Me.ismSesionCerrar.Enabled = False            Me.ismSesionIniciar.Enabled = True          End If    End Sub 


previamente tengo para cerrar un boton  exclusivo para cerrar lo form hijos

[/CODE] Private Sub tsbSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsbSalir.Click
        'EL MDI ACTIVO CREA EL DELEGADO Y APUNTA AL METODO ASIGANDO
        Try
            Me.ActiveMdiChild.Invoke(DelegadoMenuArchivo.CreateDelegate(GetType(DelegadoMenuArchivo), Me.ActiveMdiChild, "Salir"))
        Catch ex As Exception
            '  MessageBox.Show("Función No Disponible", "Aviso", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End Try
    End Sub[CODE]


y por ultimo tengo el form hijo que deceo cerrar en este caso el de alumno

  Public Sub Salir() Implements InterfaceMenuArchivo.Salir
        If MsgBox("¿Está seguro de cerrar la Catálogo Alumnos?", MsgBoxStyle.Information + MsgBoxStyle.YesNo) = MsgBoxResult.No Then
            Exit Sub
        Else
            Me.Close()
        End If
    End Sub

el implements interfaceMenuArchivo.Salir es una clase que creo

Public Interface InterfaceMenuArchivo 'CUALQUIER CLASE QUE IMPLEMENTE ESTA INTERFACE, TOMARA ESTA INTERFACE COMO UN MOLDE, PERO  
    Sub Altas()                       'TAMBIEN PODRA AGREGAR MAS ELEMENTOS A LA CLASE.
    Sub Bajas()
    Sub Guardar()
    Sub Eliminar()
    Sub Buscar()
    Sub Recargar()
    Sub Salir()
End Interface



espero y te sirva

Saludos Josue

Navegación

[0] Índice de Mensajes