Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing Select Case e.CloseReason Case CloseReason.ApplicationExitCall 'Application.exit wurde aufgerufen Case CloseReason.TaskManagerClosing 'beendet durch Taskmanager Case CloseReason.UserClosing 'User hat das Fenster geschlossen Case CloseReason.WindowsShutDown 'Windows wird runtergefahren End Select End Sub