VB常用函数-日期时间类函数

1. Year(X)，Month(X)，Day(X)：取出年，月，日

[格式]：

P=Year(X)

取出X“年”部分的数值

P=Month(X)

取出X“月”部分的数值

P=Day(X)

取出X“日”部分的数值

[说明]：Year返回的是公元年，若X里只有时间，没有日期，则日期视为#1899/12/30#

2. Hour，Minute，Second函数：取出时，分，或秒

[格式]：

P=Hour(X)

取出X“时”部分的数值

P=Minute(X)

取出X“分”部分的数值

P=Second(X)

取出X“秒”部分的数值

[说明]：Hour的返回值是0---23之间

[范例]：

X=10:34:23

P=Hour(X)

Q=Minute(X)

R=Second(X)

则输出结果：P=10，Q=34，R=23

3. DateSerial函数：合并年，月，日成为日期

[格式]：DateSerial(Y,M,D)

其中Y是年份，M为月份，D为日期

[说明]：

（1） M值若大于12，则月份从12月起向后推算M-12个月；若小于1，则月份从1月起向后推算1-M个月。

（2） 若日期D大于当月的日数，则日期从当月的日数起，向后推算D-当月日数；若小于1，则日期从1日起向前推算1-D日。

[范例]：

P=DateSerial(2000,02,02)

则结果为P=2000/02/02

4．TimeSerial函数：合并时，分，秒成为时间

[格式]：P=TimeSerial(H,M,S)

其中H为小时数，M为分钟数，S为秒数

[说明]：推算原理同上面的DateSerial

[范例]：

P=TimeSerial(6,32,45)

结果为：P=6:32:45

5．Date,Time,Now函数：读取系统的日期时间

[格式]：

P=Date()

P=Time()

P=Now()

[说明]：这三个函数都无参数

[范例]：

若当前时间为2003年8月29日晚上19点26分45秒，则

P=Now()

结果为：P=2003-08-29 19:26:45

6．MonthName：返回月份名称

[格式]：P=MonthName(X)

[说明]：X参数可传入1---12，则返回值为“一月”、“二月”……，但是在英文Windows环境下，返回的是”January”,”February”……

[范例]：

P=MonthName(1)

则P=“一月”

7．WeekdayName：返回星期名称

[格式]：P=WeekdayName(X)

[说明]：X参数可传入1—7，则返回值为“星期日”，“星期一”……，但是在英文windows环境下，返回的是”Sunday”,”Monday”……

[范例]：

P=WeekdayName(1)

结果为：P=”星期日”

标题VB常用函数辑