Visual Basic - CERRAR TODOS LOS FORMS CHILD ABIERTOS DE UN MDIFOR

ALGUUIEN SABE CÓMO CERRAR/DESCARGAR TODOS LOS FORMULARIOS ABIERTOS QUE SON CHILD DE UN MDIFORM CON SOLO CLICKEAR UN EN COMMAND BUTTON?

GRACIAS..
SALUDOS!!!!!

Prueba con esto:
Private Sub Command1_Click()
For Each i In Forms
If i.Name <> Me.Name Then Unload i
Next
Unload Me
End Sub

GRACIAS MIGUEL, PROBLEMA RESUELTO, NO MAS PREGUNTAS....
GRACIAS