通过


DateSerial 函数

返回指定年月日的变量日期)。

语法

DateSerial(year, month, day)

DateSerial 函数语法具有以下三个命名参数

Part 说明
year 必需;类型为 Integer。 介于 100 和 9999 之间(含 100 和 9999)的数字或者数字表达式
month 必需;类型为 Integer。 任何数字表达式。
day 必需;类型为 Integer。 任何数字表达式。

备注

要指定日期,例如 1991 年 12 月 31 日,每个 DateSerial参数的数字范围应位于该单位的接受范围内; 即天数为 1–31,月数为 1–12。 但是,你也可以使用任何数值表达式为每个参数指定相对日期,该表达式表示某个日期之前或之后的天数、月数或年数。

下面的示例使用数字表达式而非绝对日期数字。 下面的示例中,DateSerial 函数返回的日期是一号的一天前 (1 - 1),八月的两个月前 (8 - 2),1990 年的十年前 (1990 - 10); 换句话说,就是 1980 年 5 月 31 日。

在 Windows 98 或 Windows 2000 中,根据用户定义的计算机设置将 year 参数解释为两位数的年份。 默认设置值介于 0 到 29 之间(含 0 和 29)时,解释为 2000–2029 年。 默认值介于 30 到 99 之间时解释为 1930–1999 年。 对于所有其他 year 参数,使用四位数的年份(例如 1800)。

Windows 的早期版本根据上述默认值解释两位数的年份。 为确保函数返回正确的值,请使用四位数的年份。

当任何参数超出该参数接受的范围时,它根据需要递增到下一个更大的单位。 例如,如果您指定了 35 天,那么根据在一年中所处的时间段,将其计算为一个月又过了几天。 如果任何单个参数超出了 -32,768 - 32,767 范围,将发生错误。 如果这三个参数指定的日期超出了日期的可接受范围,将发生错误。

注意

对于 yearmonthday,如果 Calendar 属性设置为 Gregorian,那么假定提供的值也是 Gregorian。 如果 Calendar 属性设置为 Hijri,那么提供的值也假定为 Hijri。

返回的日期部分采用当前 Visual Basic 日历的时间单位。 例如,如果当前日历为 Hijri,而要返回的日期部分为年份,那么年份值为 Hijri 年份值。 对于参数 year,值如果介于 0 到 99 之间(含),则解释为 1400-1499 年。 对于所有其他 year 值,请使用完整的四位数年份(例如 1520)。

示例

此示例使用 DateSerial 函数返回指定年月日的日期。

Dim MyDate
' MyDate contains the date for February 12, 1969.
MyDate = DateSerial(1969, 2, 12)    ' Return a date.

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。