Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
My.Computer.Audio.Play("Ende.Wav", AudioPlayMode.Background)
   If MessageBox.Show("                 Beenden?", "", MessageBoxButtons.YesNo) _
     = Windows.Forms.DialogResult.No Then
     e.Cancel = True
End If
End Sub