Private Sub dataGridView1_CellFormatting(ByVal sender As Object, _
        ByVal e As DataGridViewCellFormattingEventArgs) _
        Handles DataGridView1.CellFormatting
        ' If the column is the Artist column, check the
        ' value.
        If Me.DataGridView1.Columns(e.ColumnIndex).Name _
            = "Geschlecht" Then
            If e.Value IsNot Nothing Then
                ' Check for the string "pink" in the cell.
                Dim stringValue As String = _
                CType(e.Value, String)
                stringValue = stringValue.ToLower()
                If ((stringValue.IndexOf("Weiblich") > -1)) Then
                    e.CellStyle.BackColor = Color.Pink
                Else
                    e.CellStyle.BackColor = Color.LightBlue
                End If
            End If
        End If
    End Sub

VB@rchiv its the Best