以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于日期运算的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=106164)
--  作者：sgkyzfh
--  发布时间：2017/9/3 21:40:00
--  关于日期运算的问题
老师你好，我有个问题想请教：在表A里有两列，即：“日期列”和“到期列”我想实现这样一个目的，就是：当日期列的值小于等于系统日期两天时，“到期列”就自动显示“已经到期”值。能否做到吗
--  作者：有点甜
--  发布时间：2017/9/3 22:25:00
--  

方法一：drawcell事件

 

If e.Col.Name = "到期" Then

    If e.row("日期") <= Date.Today.AddDays(-2) Then

        e.Text = "已经到期"

    End If

End If

 

 方法二：

 

http://www.foxtable.com/webhelp/scr/2471.htm