vb中日期时间型减日期时间型

来源:百度知道 编辑:UC知道 时间:2024/05/09 05:31:09
vb中日期时间型减日期时间型得什么啊!
例如:#2008-08-08 8:08:08 AM#-now()
得到 134.943807870368的数
我知道134是天数,那后面的小数代表什么呢?
我要得到小时,分钟怎么算咯!

Dim d As Date
d = #8/8/2008 8:16:08 AM# - #8/8/2008#
MsgBox Hour(d)
MsgBox Minute(d)
MsgBox Second(d)

分钟是:
MsgBox DateDiff("n", Now(), CDate("2008-08-08 8:08:08 AM"))

小时是:
MsgBox DateDiff("h", Now(), CDate("2008-08-08 8:08:08 AM"))

DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])

如分钟 MsgBox DateDiff("n", date1, date2)

interval 参数的设定值如下:

设置 描述
yyyy 年
q 季
m 月
y 一年的日数
d 日
w 一周的日数
ww 周
h 时
n 分钟
s 秒