以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请教如何计算和去年同一天相差的天数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=28498)

--  作者:guoqi1129
--  发布时间:2013/1/31 11:16:00
--  [求助]请教如何计算和去年同一天相差的天数
求助]请教如何计算和去年同一天相差的天数
--  作者:lin_hailun
--  发布时间:2013/1/31 11:25:00
--  
 这个很简单。代码如下。

Dim d1 As Date = Date.Today
Dim d2 As Date = Date.Today.AddYears(-1)
msgbox((d1-d2).TotalDays)