Как сделать, чтобы Form1 не закрывалась пока не закрылись вспомогающие Form2, Form3 - VB

'Form1
Private Sub mnuНачальник_Click()
Form3.Show
Form1.Enabled = False
End Sub
 
Private Sub Command1_Click()
Form2.Show
Form1.Enabled = False
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
End
End Sub
Private Sub mnuИнженер_Click()
Form4.Show
Form1.Enabled = False
End Sub
Private Sub mnuУПУ_Click()
Form5.Show
Form1.Enabled = False
End Sub
 
'Form2
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = True
Form2.Hide
'Form1.Show
Form1.Enabled = True
End Sub
' И так далее для других форм 3,4,5