两个日期时间数据相减，得到的就是一个时段型数据。
例如：
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 - d1Output.Show(t.Days & "天" & t.Hours & "小时" & t.Minutes & "分" & t.Seconds & "秒")
在命令窗口执行上述代码，得到的输出结果是：2115天21小时41分20秒
加好友 
发短信
Post By：2013/4/10 18:54:00 [显示全部帖子]
