以文本方式查看主题

-  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=10367)
--  作者：fuzhiyong
--  发布时间：2011/6/2 9:59:00
--  [求助]日期计算问题
我想把输入的日期计算出天数（最好每天的时间变动原输入日期不变的情况下，计算出的天数也变动）我不知怎么弄！望高手指点下！
--  作者：blackzhu
--  发布时间：2011/6/2 11:03:00
--  

Days

返回时段数据的天数。

例如：

Dim d1 as Date = #3/17/2002 12:30:29#
Dim d2 as Date = #1/1/2008 10:11:49#
Dim t As TimeSpan = d2 - d1
Output.Show(t.Days & "天" & t.Hours & "小时" & t.Minutes & "分" & t.Seconds & "秒")

上述代码的输出结果是：2115天21小时41分20秒