Example change grid color with Devexpress
Private Sub GVMain_RowStyle(sender As Object, e As RowStyleEventArgs) Handles GVMain.RowStyle
Dim View As GridView = sender
If (e.RowHandle >= 0) Then
Dim lamakerja As String = View.GetRowCellDisplayText(e.RowHandle, View.Columns(“LAMAKERJA”))
Dim CEKLIS As Boolean = View.GetRowCellValue(e.RowHandle, View.Columns(“FLAGSPBTTD”))
If lamakerja = 1 And CEKLIS = False Then
e.Appearance.BackColor = Color.Yellow
ElseIf lamakerja > 2 And CEKLIS = False Then
e.Appearance.BackColor = Color.Red
End If
End If
End Sub
Thank you.
