DateAdd 函数

返回一个 Variant (Date) 值,其中包含已添加了指定时间间隔的日期。

语法

DateAdd 间隔、 数字、 日期

DateAdd函数语法具有以下参数︰

参数

描述

间隔

必填。要添加的时间间隔的字符串表达式。

数字

必填。数值表达式,表示您想要添加的间隔数。它可以是正数 (以获取将来的日期) 或负数 (以获取过去的日期)。

日期

必填。变体(日期) 或文本表示要向其添加间隔的日期。


提示: 在 Access 2010 中,表达式生成器具有 IntelliSense,以便您可以查看您的表达式需要哪些参数。

设置

间隔 参数具有这些设置︰

设置

说明

yyyy

q

季度

m

月份

y

年中的某一天

d

w

工作日

ww

h

小时

n

分钟

s


注解

DateAdd函数用于增加或减去指定的时间间隔的日期。例如,您可以使用DateAdd计算从今天或从 45 分钟的时间现在 30 天的日期。

日期添加天数,可以使用年天 ("y"),Day ("d") 或 Weekday ("w")。

DateAdd函数不会返回无效日期。下面的示例将 1 月 31 日加上一个月︰

DateAdd("m", 1, "31-Jan-95")

在此例中, DateAdd返回 28-95 日,而不是 95 月 31。如果日期为 31 Jan 96,它可以返回 29 日 96,因为 1996 年为年份。

如果计算的日期之前的年份 100 (即减去年以上大于date中) 时,出现错误。

如果数字不是一个 long 类型,它进行计算之前舍入到最接近的整数。

注意: 未由传递date参数中的格式控制面板设置决定DateAdd的返回值的格式。

注意: 日期,如果日历属性设置为公历,提供的日期必须是公历。如果日历为回历,提供的日期必须是回历。如果月份值的名称,该名称必须与当前的日历属性设置一致。若要最小化月份名称与当前的日历属性设置冲突的可能性,输入数字的月份值 (短日期格式)。

示例

注意: 下面的示例说明使用此函数在 Visual Basic for Applications (VBA) 模块。有关处理 VBA 的详细信息,搜索旁边的下拉列表中选择开发人员参考,然后在搜索框中输入一个或多个术语。

本示例将一个日期作为输入,并使用DateAdd函数显示指定的月数将来的相应日期。

Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m" ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

注释: 

  • 机器翻译免责声明:本文是由无人工介入的计算机系统翻译的。Microsoft 提供机器翻译是为了帮助非英语国家/地区用户方便阅读有关 Microsoft 产品、服务和技术的内容。由于机器翻译的原因,本文可能包含词汇、语法或文法方面的错误。

  • 请在 此处 中查找本文的英文版本以便参考。你和 Microsoft 社区的其他成员可以使用 Community Translation Framework (CTF) 来改进本文。只需将鼠标悬停在文章中的句子上,然后在 CTF 小组件中单击“IMPROVE TRANSLATION”即可。 单击此处了解有关 CTF 的详细信息。 使用 CTF 即表示你同意服务条款

扩展你的技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×