【发布时间】:2016-12-24 11:27:21
【问题描述】:
我有两个图书馆实体,一个是“借书日期”,另一个是“归还书到期日期”。我希望归还日期是借书日期后的 14 天。我怎样才能做到这一点?谢谢!
【问题讨论】:
-
@whoever 否决了这个问题,请添加评论解释你的原因。此用户是新用户,可能不是通灵者。
-
@PowerUser - 你们都需要阅读How to Ask。
我有两个图书馆实体,一个是“借书日期”,另一个是“归还书到期日期”。我希望归还日期是借书日期后的 14 天。我怎样才能做到这一点?谢谢!
【问题讨论】:
试试这个:
dateadd("d",14,mydatevariable)
【讨论】:
DateAdd("d",14,mydatevariable)。如果在 SQL 查询而不是 VBA 中使用单引号,则可以使用单引号而不是双引号。
这里有两个选项。您可以使用我推荐的DateAdd 函数,也可以使用加法运算符。
推荐:
Dim datIssued As Date
Dim datDue As Date
datIssued = Now()
'calculate due date
datDue = DateAdd("d", 14, datIssued)
'update record
Me.FieldName = datDue
或替代方案:
Dim datIssued As Date
Dim datDue As Date
datIssued = Now()
'calculate due date
datDue = datIssued + 14
【讨论】: