access日期和小时的加减

hillsoft　发表于：2013-04-11 15:28:24 　

在access中利用NOW（）得到的系统时间，如何实现自动减去小时数，得到一个新的日期时间。

比如系统时间是2013/4/11 02:10:40，自动减去4小时，得到新的时间是2013/4/10 22:10:40.

目前事件过程代码是：

Private Sub Line_AfterUpdate()
Me.Line_Date.Value = Now()
Dim a As String
If IsNull(Me.Text12) Then a = 0 Else a = Me.Text12
If (a + Me.Line_Out) = DLookup("[Order Qty]", "Order Schedule", "[Order]='" & Me.Order & "'") Then Me.AllowAdditions = False
End Sub

Top

hillsoft 发表于：2013-04-11 15:52:55

自己顶顶，望大侠帮帮忙

Top

叶海峰发表于：2013-04-11 16:51:15

dateadd("h",-4,now())

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

access日期和小时的加减