Cita:
Iniciado por Predaaator amigo, Muchas gracias
, todo perfecto, pero.....no me funciono así, me funciono de este modo...
For i = 1 To Forms.Count - 1
If Forms(1).Name <> "Inicio" Then
Unload Forms(1)
End If
Next
a "i" le puse el valor de 1 para que no contará el MDI padre, y elimine los "i" por que no quiso funcionar así, me da un error, imagino que cuando se cierra un form(1), el form(2) pasa a ser el form(1) y así sucesivamente.......pero de todos modos, ya me funciona, pero si sabes que es lo que estoy haciendo mal, avisame, muchas gracias, me fue muy útil
mejor es de este modo...ya que si el form(0) es el MDI padre, no tiene que estar comparando con nadie...simplemente cuenta el número de Form, descarta el MDI padre, y comienza a cerrar el número de form existentes, tomando en cuenta que cada vez que el Form(1) se cierra, el que le sigue toma su lugar.
For i = 1 To Forms.Count - 1
Unload Forms(1)
Next