以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]日期计算问题  (http://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秒