DevExpress.XtraGrid.Views.Grid 的颜色设置

DevExpress.XtraGrid的颜色功能
Category: 

在GridView事件中添加以下代码:

Imports DevExpress.XtraGrid.Views.Grid
' ...

Private Sub GridView1_RowStyle(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs) Handles GridView1.RowStyle
Dim view As GridView = sender
If (e.RowHandle >= 0) Then
Dim category As String = view.GetRowCellDisplayText(e.RowHandle, view.Columns("Category"))
If category = "Beverages" Then
e.Appearance.BackColor = Color.Salmon
e.Appearance.BackColor2 = Color.SeaShell
End If
End If
End Sub

还可以具体选择某几列选择颜色:
Imports DevExpress.XtraGrid.Views.Grid
' ...

Private Sub GridView1_RowCellStyle(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.RowCellStyleEventArgs) Handles GridView1.RowCellStyle
Dim view As GridView = sender
If e.Column.FieldName = "Count" Or e.Column.FieldName = "Unit Price" Then
Dim category As String = view.GetRowCellDisplayText(e.RowHandle, view.Columns("Category"))
If category = "Seafood" Then
e.Appearance.BackColor = Color.DeepSkyBlue
e.Appearance.BackColor2 = Color.LightCyan
End If
End If
End Sub

对列名为Count和Unit Price的两列显示颜色,其它列不考虑.
(具体详情请查看自带文档中的
ms-help://DevExpress2005/DevExpress.XtraGrid/CustomDocument758.htm)