以文本方式查看主题

-  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=122819)
--  作者：xiao65403329
--  发布时间：2018/8/2 16:16:00
--  [求助]年月日的计算
已知管理年限20年    开始时间2018.8.2日    计算出到达时间提前一天2038.8.1  这个表达式怎么弄
--  作者：有点甜
--  发布时间：2018/8/2 16:45:00
--  

参考

 

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

 

DataColChanged事件

 

Dim d As Date = e.DataRow("开始时间")

If d = nothing Then

    e.DataRow("到达时间") = Nothing

Else

    e.DataRow("到达时间") = d.AddYears(20).AddDays(-1)

End If

[此贴子已经被作者于2018/8/2 16:44:57编辑过]