Private Sub ButtonSuchen_Click_1(sender As Object, e As EventArgs) Handles _
      ButtonSuchen.Click
        DataGridView1.Rows.Clear()
        DataGridView1.Columns.Clear()
        Dim lines As String() =
Microsoft.VisualBasic.Split(My.Computer.FileSystem.ReadAllText(
"W:\CD-Liste\ARTISTS.txt", System.Text.Encoding.Default),
Microsoft.VisualBasic.vbCrLf)
        With DataGridView1
            .Columns.Add("Interpret", "Interpret")
            .Columns.Add("Titel", "Titel")
            .Columns.Add("Genre", "Genre")
            .Columns.Add("Standort", "Standort")
 
            Dim fields() As String
            For Each line As String In lines
                fields = line.Split(";"c)
                .Rows.Add(fields)
            Next line
        End With
 
        DataGridView1.Columns("Interpret").Width = 350
        DataGridView1.Columns("Titel").Width = 340
        DataGridView1.Columns("Genre").Width = 150
        DataGridView1.Columns("Standort").Width = 90
 
        DataGridView1(DataGridView1.CurrentCell.ColumnIndex, _
          DataGridView1.CurrentCell.RowIndex).Selected = False
 
        DataGridView1.Visible = True
        PictureBoxCover.Visible = False
 
        For Each Iterrow As DataGridViewRow In DataGridView1.Rows
            For Each c As DataGridViewCell In Iterrow.Cells
                If c.Value IsNot Nothing AndAlso c.Value.ToString.Contains( _
                  TextBox1.Text) Then
                    c.Style.BackColor = Color.Red
                    c.Style.ForeColor = Color.Yellow
                Else
                    c.Style.BackColor = Color.White
                End If
 
                If c.Style.BackColor = Color.Red Then
                    DataGridView1.FirstDisplayedScrollingRowIndex = _
                      DataGridView1.Rows.Count - 1
                End If
            Next
        Next
 
    End Sub

                If c.Style.BackColor = Color.Red Then
                    DataGridView1.FirstDisplayedScrollingRowIndex = _
                      DataGridView1.Rows.Count - 1
                End If