If e.Col.IsNumeric AndAlso e.Col.Caption.StartsWith("一号车")
If e.Row.IsNull(e.Col.Name) = False
If e.Row(e.Col.Name) < 15 Then
e.Table.DataTable.AddUserStyle("绿牌",Color.FromARGB(0, 192, 0), Color.DarkSlateGray)
e.Style = "绿牌"
Else If e.Row(e.Col.Name) >= 15 AndAlso e.Row(e.Col.Name) <= 20 Then
e.Table.DataTable.AddUserStyle("黄牌", Color.Yellow, Color.DarkSlateGray)
e.Style = "黄牌"
Else If e.Row(e.Col.Name) > 20 Then
e.Table.DataTable.AddUserStyle("红牌", Color.Red, Color.DarkSlateGray)
e.Style = "红牌"
End If
End If
End If
[此贴子已经被作者于2014-11-1 22:01:56编辑过]
加好友 
发短信
Post By：2014/11/1 18:01:00 [显示全部帖子]
