主题：到期提醒设计，到期变色没反应，我结束日期是日期型不用计算的

Select Case e.Col.Name

    Case "合同结束日期"

        If e.Row.IsNull("合同结束时间") = false

            If e.Row("合同结束时间") < Date.Today Then

                e.Style = "已经到期"

            ElseIf e.Row("合同结束时间") < Date.Today.AddDays(10) Then

                e.Style = "即将到期"

            End If

        End If

End Select

没有反应，不变色，我的合同结束时间是日期型的