以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  drawcell事件问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172562)
--  作者：ycs5801
--  发布时间：2021/10/19 15:50:00
--  drawcell事件问题
Select Case e.Col.Name
    Case "发起时间","完成时限"
        If e.Row("完成时限")  IsNot Nothing And e.Row("发起时间")  IsNot Nothing Then           
            Dim t As TimeSpan
            t = CDate(e.Row("完成时限"))- Date.Today
            If t.TotalDays <2 Then
                e.Style = "1天到期"
            End If            
        End If
End Select

在drawcell事件中，貌似不起作用，帮忙看看。
--  作者：有点蓝
--  发布时间：2021/10/19 15:56:00
--  
Select Case e.Col.Name
    Case "完成时限"
        If e.Row.isnull("完成时限") =false Then          这个列必须都有值 
            Dim t As TimeSpan
            t = CDate(e.Row("完成时限"))- Date.Today
            If t.TotalDays < 2 Then "完成时限"必须是明天10月20日之前才可以
                e.Style = "1天到期"
            End If            
        End If
End Select
--  作者：ycs5801
--  发布时间：2021/10/19 16:08:00
--  
老师，我这个地方想实现整个行都变色。
--  作者：有点蓝
--  发布时间：2021/10/19 16:15:00
--  
去掉Select Case判断
--  作者：ycs5801
--  发布时间：2021/10/19 16:23:00
--  
以下是引用有点蓝在2021/10/19 16:15:00的发言：
去掉Select Case判断

还是不行，我现在把其中一行中的完成时限改成10月20日，正常这行应该可以变色了啊？但是没有
--  作者：有点蓝
--  发布时间：2021/10/19 16:37:00
--  
我测试没有问题，请上传实例说明