• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Close All MDI Children Simply

Close All MDI Children Simply

This code allows you to close all the MDI child forms in an MDI form at once.
Goto https://www.vbgreatone.com/ to learn like you've never learned before. Get over 500 api functions with example for each, and tips like this and, much much more. Just visit it, i'm sure you will like it.
First, create a menu item in the MDI form name mnuCloseAll, then paste in this code:

Rate Close All MDI Children Simply

• 1
• 2
• 3
• 4
• 5

(42(42 Vote))

Private Sub mnuCloseAll_Click()
 Screen.MousePointer = vbHourglass
 Do While Not (Me.ActiveForm Is Nothing) 
  Unload Me.ActiveForm 
 Loop 
 Screen.MousePointer = vbDefault 
End Sub
'Once the user clicks on that menu item, the MDI child forms will close.