Osvaldo
11 de Enero del 2006

Necesito saber como hago para que al apretar la x(cerrar) un formulario MDI, me cierre lodos los que no son Hijos (MDIChild=false)
Que codigo utilizo

Gracias

mvallejos
11 de Enero del 2006

Recorriendo todos los forms activos de la aplicacion

Sub CerrarFormsHijos
Dim F as Form

For Each F In Forms
' Para que no se cierre a sí mismo
IF F.Name <> Me.Name Then
Unload F
End if
Next F

End Sub

A esta sub la llamas en el evento QueryUnload del formulario MDI principal

Saludos