Private Const WM_CLOSE = &H10
 
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
  If m.Msg = WM_CLOSE Then
    Debug.Print("Close")
    ' Form nicht schließen, nur verstecken
    Me.Hide()
    Exit Sub
  End If
  MyBase.WndProc(m)
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de