DRAWCELL 事件全部代码:
If e.Row("日期")<Date.Today() AndAlso e.Row.IsNull("日期") = False Then
e.style="gray"
Else If e.Row.IsNull("日期") = False AndAlso CDate(e.Row("日期")).Day Mod 2 = 1 Then
e.Style = "yellow"
End If
e.Table.DataTable.AddUserStyle("当前行", Color.Red, Color.black)
If e.Row.Index = e.Table.Current.Index
e.Style = "当前行"
End If
If e.Row.IsNull("签约终止日") = False
If e.Row("签约终止日") < Date.Today.AddDays(14) Then
e.Style = "red"
End If
End If
If e.Row.Isnull("日期") = True AndAlso e.Row.Isnull("客户信息") = False
e.style = "purple"
End If
If e.Row("颜色") = "黄色"
e.style ="黄色"
End If
If e.Row("颜色") = "红色"
e.style ="红色"
End If
If e.Row("颜色") = "蓝色"
e.style ="蓝色"
End If