Private Sub Form2_FormClosing(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
 
  If e.CloseReason = CloseReason.MdiFormClosing Then
    MsgBox("Child muss manuell geschlossen werden!")
    e.Cancel = True
  End If
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de