返回指定年、月和日的变量型(日期型)。
语法
DateSerial(year, month, day)
DateSerial 函数的语法包含以下参数 (参数:为操作、事件、方法、属性、函数或过程提供信息的值。):
参数 | 说明 |
---|---|
year | 必选。Integer。表示 100 和 9999(含)之间的数字或数值表达式 (数字表达式:计算结果为数字的任何表达式。表达式可以是变量、常数、函数和运算符的任意组合。)。 |
month | 必选。整型。任何数值表达式。 |
day | 必选。整型。任何数值表达式。 |
注解
若要指定日期,例如 1991 年 12 月 31 日,则每一个 DateSerial 参数 (参数:为操作、事件、方法、属性、函数或过程提供信息的值。)的数字范围都应该在所用单位的可接受范围内;即天数的范围为 1 至 31,月数的范围为 1 至 12。不过,还可以为每个参数指定相对日期,方法是使用表示某个特定日期之前或之后的天数、月数或年数的数值表达式。
以下示例使用数值表达式而不是绝对日期数字。此处,DateSerial 函数返回一个日期,该日期早于 1990 年 10 年 (1990 - 10
),早于八月两个月 (8 - 2
),是第一天的前一天 (1 - 1
) ;换而言之,即 1980 年 5 月 31 日。
DateSerial(1990 - 10, 8 - 2, 1 - 1)
year 参数的两位数年份是基于用户定义的计算机设置进行解释的。默认设置是 0 和 29(含)之间的值将解释为 2000–2029 年。30 和 99 之间的默认值将解释为 1930–1999 年。对于其他所有 year 参数,使用四位数年份(例如,1800)。
早于 Windows 2000 的 Windows 版本会基于上面描述的默认值解释两位数年份。若要确保函数返回正确值,请使用四位数年份。
任何参数超过该参数的可接受范围时,它会相应递增至下一个较大的单位。例如,如果指定了 35 天,则它会被估算为一个月零几天,具体取决于它应用在年中的位置。如果其中任何一个参数超出了 -32,768 到 32,767 这一范围,将发生错误。如果这三个参数指定的日期超出了日期的可接受范围,也会发生错误。
注释 对于 year、month 和 day,如果 Calendar 属性设置为公历,则提供的值会默认为公历。如果 Calendar 属性设置为回历,则提供的值会默认为回历。
返回的日期部分采用当前 Visual Basic 日历的时间段单位。例如,如果当前日历为回历,并且要返回的日期部分为年份,则年份值为回历。对于参数 year,介于 0 和 99(含)之间的值会解释为年份 1400-1499。对于所有其他 year 值,则使用完整的四位数年份(例如 1520)。
示例
注释 以下示例演示了此功能在 Visual Basic for Applications (VBA) 模块中的使用。有关使用 VBA 的详细信息,请在“搜索”旁边的下拉列表中选择“开发人员参考”,然后在搜索框中输入一个或多个词条。
以下示例使用 DateSerial 函数返回指定的年、月和日的日期。
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.