以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期计算  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176061)
--  作者：admin22327
--  发布时间：2022/3/29 1:32:00
--  日期计算

当前月份向前推12个月，代码怎么赋值呢 

Dim y As Integer = Date.Today.Year
        Dim dt1 As New Date(y, 1, 1)（这个代码怎么赋值呢）
        Dim dt2 As New Date(y, 12, 31)
当期日期向前推365天，怎么赋值？ 谢谢

[此贴子已经被作者于2022/3/29 1:33:30编辑过]
--  作者：有点蓝
--  发布时间：2022/3/29 8:43:00
--  

当前月份向前推12个月：dim d as  date =  = Date.Today.AddMonths(-12)
当期日期向前推365天：dim d as  date =  = Date.Today.AddDays(-365)