以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于日期提醒  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63215)

--  作者:kittyzhang
--  发布时间:2015/1/16 11:09:00
--  [求助]关于日期提醒
请问各位专家,如果我现在有个“实际到货期”的列,一个“要求到货期”的列。

想实现以下要求:如果“实际到货期”的列为空,
                      那么现在距离要求货期只有两天的话就标记成自定义样式“到货期提醒”,
                       如果已经超过“要求到货期”那么标记成自定义样式“过期提醒”

编码如下:

If e.Col.Name = "要求货期" Then
    If e.Row.IsNull("要求货期") = False
        If e.Row("要求货期") < Date.Today.AddDays(3) Then
            e.Style = "到货期提醒"
        End If
    End If
End If 

If e.Col.Name = "要求货期" Then
    If e.Row.IsNull("要求货期") = False
        If e.Row("要求货期") < Date.Today.AddDays(0) Then
            e.Style = "过期提醒"
        End If
    End If
End If

前面的  “”“如果“实际到货期”的列为空,”“”“这里不会写。。。。汗。。。

--  作者:有点甜
--  发布时间:2015/1/16 11:11:00
--  

If e.Row.IsNull("实际到货期") Then

 

 

End If


--  作者:kittyzhang
--  发布时间:2015/1/16 11:19:00
--  
感谢~!图片点击可在新窗口打开查看