Puedes hacer algo similara lo siguiente:
Código vb:
Ver originalSelect Case Trim(valor)
Case filtro2
dgv.Rows(i).DefaultCellStyle.BackColor = color1
Case filtro3
dgv.Rows(i).DefaultCellStyle.BackColor = color2
Case Else
dgv.Rows(i).DefaultCellStyle.BackColor = color3
End Select
Saludos!