VBS教程:函数-DateSerial 函数
VBS教程:函数-DateSerial 函数
发布时间:2016-12-28 来源:查字典编辑
摘要:DateSerial函数对于指定的年、月、日,返回Date子类型的Variant。DateSerial(year,month,day)Arg...

DateSerial 函数

对于指定的年、月、日,返回

Date 子类型的

Variant。

DateSerial(year, month, day

)

Arguments

Year

从 100 到 9999 之间的数字或数值表达式。

Month

任意数值表达式。

Day

任意数值表达式。

说明

要指定日期,如 1991 年 12 月 31 日,

DateSerial 函数中每个参数的取值范围都应该是可接受的;即日的取值应在 1 和 31 之间,月的取值应在 1 和 12 之间。但是,也可以使用表示某日之前或之后的年、月、日数目的数值表达式为每个参数指定相对日期。

以下样例中使用了数值表达式代替绝对日期。在这里,

DateSerial 函数返回 1990 年 8 月 1 日之前十年 (1990 - 10) 零两个月 (8 - 2) 又一天 (1 - 1) 的日期:即 1980 年 5 月 31 日。

Dim MyDate1, MyDate2MyDate1 =

DateSerial(1970

, 1

, 1

)' Returns January 1, 1970.MyDate2 =

DateSerial(1990 - 10

, 8 - 2

, 1 - 1

)' Returns May 31, 1980.

对于

year 参数,若取值范围是从 0 到 99,则被解释为 1900 到 1999 年。对于此范围之外的

year 参数,则使用四位数字表示年份(例如 1800 年)。

当任何一个参数的取值超出可接受的范围时,则会适当地进位到下一个较大的时间单位。例如,如果指定了 35 天,则这个天数被解释成一个月加上多出来的日数,多出来的日数取决于其年份和月份。但是如果参数值超出 -32,768 到 32,767 的范围,或者由三个参数指定(无论是直接还是通过表达式指定)的日期超出了可以接受的日期范围,就会发生错误。

推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
相关阅读
网友关注
最新vbs学习
热门vbs学习
脚本专栏子分类