以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  到期提醒设计，到期变色没反应，我结束日期是日期型不用计算的  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=141028)
--  作者：djsolodj
--  发布时间：2019/9/19 20:39:00
--  到期提醒设计，到期变色没反应，我结束日期是日期型不用计算的

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


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

[此贴子已经被作者于2019/9/19 20:50:10编辑过]
--  作者：有点酸
--  发布时间：2019/9/19 22:35:00
--  
1、代码看不出问题，可以做个例子上来测试。
2、要确保你这个表已经增加了已经到期和即将到期两个样式