If e.Col.Name = "日期" Then If e.Row.IsNull("日期") = False If e.Row("日期") < Date.Today.AddDays(2) Then If e.Row("条件2") = "是" And e.Row("条件1") = "是" Then e.Style = "样式1" Else If e.Row("条件2") = "是" Then e.style = "样式2" Else e.Style = "样式3" End If End If End If End If End If