رنگی کردن ردیفهای خاص در دیتاگرید

[swallow.pa]

سلام به همه
توی دیتاگرید بعضی رکوردهای خاص که مثلا فیلد Active اونها برابر False می باشد رو می خوام رکوردهای اون قرمز رنگ بشه چی کار کنم
ممنون

[viper2009]

Sub ColorRowGrid()
Dim i As Integer
For i = 0 To DataGridView1.RowCount - 1
If DataGridView1.Item("Column", i).Value IsNot Nothing AndAlso DataGridView1.Item("Column", i).Value = False Then
DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Blue
End If
Next
End Sub

Private Sub DataGridView1_RowPostPaint(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewRowPostPaintEvent Args) Handles DataGridView1.RowPostPaint
ColorRowGrid()
End Sub