VB 常用时间日期函数

 

 

[格式]：   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=“一月”