以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何生成指定期限的日期?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109635)

--  作者:hrw68529
--  发布时间:2017/11/16 8:23:00
--  [求助]如何生成指定期限的日期?
如下图:在保管开始时间中,根据年度,生成次年1月1日,在保管截止时间中,保管开始时间+保管期限,生成保管截止时间,代码如何写?谢谢。例如:如果年度中显示2017年,则保管开始时间应该为2018年1月1日,保管截止时间应该为2068年1月1日。
如图:
图片点击可在新窗口打开查看此主题相关图片如下:截图00.jpg
图片点击可在新窗口打开查看

--  作者:hrw68529
--  发布时间:2017/11/16 8:32:00
--  
日期格式为:2018-1-1
--  作者:有点甜
--  发布时间:2017/11/16 8:41:00
--  

If e.DataCol.Name = "年度" OrElse e.DataCol.name = "期限" Then
    If e.DataRow.isnull("年度") OrElse e.DataRow.isnull("期限") Then
        e.DataRow("保管开始时间") = Nothing
        e.DataRow("保管截止时间") = Nothing
    Else
        e.DataRow("保管开始时间") = new Date(e.DataRow("年度")+1, 1, 1)
        e.DataRow("保管截止时间") = e.DataRow("保管开始时间").addyears(e.DataRow("期限"))
    End If
End if


--  作者:hrw68529
--  发布时间:2017/11/16 9:00:00
--  
谢谢,棒极了