Public Class MyDataGridTextBoxColumn
    Inherits DataGridTextBoxColumn
 
    Protected Overloads Overrides Sub Paint( _
                                            ByVal g As Graphics, _
                                            ByVal bounds As Rectangle, _
                                            ByVal source As CurrencyManager, _
                                            ByVal rowNum As Integer, _
                                            ByVal backBrush As Brush, _
                                            ByVal foreBrush As Brush, _
                                            ByVal alignToRight As Boolean)
        Dim c As Integer = CType(Me.DataGridTableStyle.DataGrid.DataSource, _
          Data.DataTable).Rows.Count
        If rowNum = 0 OrElse rowNum = (c - 1) OrElse rowNum = (c - 1) / 2 Then
            backBrush = New SolidBrush(Color.Blue)
            foreBrush = New SolidBrush(Color.White)
        Else
            backBrush = New SolidBrush(Color.Red)
            foreBrush = New SolidBrush(Color.Green)
        End If
        MyBase.Paint(g, bounds, source, rowNum, backBrush, foreBrush, _
          alignToRight)
    End Sub
End Class