Private Sub frmSchrittkette_Closing(ByVal sender As Object, ByVal e As _
  System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        frmSKEditorS.Fensterdarstellung()
        'Beim Schliessen der Kette die Close-Methode abfangen und mit Hide 
        ' ausblenden
        e.Cancel = True
        Me.Hide()
    End Sub