DATEADD的日期随时间变化的问题~~~如何在跨越00:00的时候使得日期也自动变化呢???
数据库中 时间字段 23:00 日期字段:2007-05-05
如何使使得时间字段加5个小时后,日期字段随时间的变化而变化
上述例子 希望合成的结果为 2007-05-06 04:00
使用DATEADD我只会使的时间字段变换增加 5小时,但是日期如何自动变化呢?如何在跨越00:00的时候使得日期也自动变化呢???
[解决办法]
不能改库结构的话,就这样:
Dim d As Date, t As Date
d = #5/5/2007#
t = #11:00:00 PM#
d = d + t
d = DateAdd( "h ", 5, d)
t = Format(d, "hh:mm:ss ")
d = Format(d, "MM-DD-YYYY ")
MsgBox d
MsgBox t