Visual Basic - comando para cerrar forms y MDIform activo

Me pueden ayudar con lo siguiente:

Necesito conocer un comando en donde me cierre todas las ventanas (forms) en este momento esten activas y que la ventana principal (MDIform) se mantenga activa activa.

Muchas gracias!!!!

Prueba con esto:
Private Sub mnuCerrar_Click()
Do While Not (Me.ActiveForm Is Nothing)
Unload Me.ActiveForm
Loop
End Sub