Private Sub PlaylistEntfernen()
        Dim MarkierterTab As Integer = TabControl1.SelectedIndex
        TabControl1.TabPages.Remove(TabControl1.SelectedTab)
        If MarkierterTab = TabControl1.TabCount And MarkierterTab > 0 Then
            TabControl1.SelectedIndex = MarkierterTab - 1
        ElseIf MarkierterTab > 0 Then
            TabControl1.SelectedIndex = MarkierterTab - 1
        End If
 
 
    End Sub