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="星期日"

Time	返回系统时钟的当前时间。
Date	返回系统时钟的当前日期。
Now	返回代表当前日期和时间的编码值。该函数经常用作其它系统时钟函数的参数。
Hour(Time)	返回指定时间的小时部分（0到23）。
Minute(Time)	返回指定时间的分钟部分（0到59）。
Second(Time)	返回指定时间的秒部分（0到59）。
Day(Date)	返回月份中的日期数（1到31）。
Month(Date)	返回日期中的月份（1到12）。
Year(Date)	返回日期中的年度。
Weekday(Date)	返回日期中代表一周中的星期几。

Abs(n)	返回n的绝对值。
Atn(n)	返回n的反正切值，以弧度为单位。
Cos(n)	返回n的余弦值，以弧度为单位。
Exp(n)	返回e的n次方。
Rnd(n)	产生0到1之间的一个随机数。
Sgn(n)	n小于0时返回-1，n等于0时返回0，n大于0时返回1。
Sin(n)	返回n的正弦值，以弧度为单位。
Sqr(n)	返回n的平方根。
Str(n)	把数值值转换成字符串。
Tan(n)	返回n的正切值，以弧度为单位。
Val(n)	把字符串转换为数值值。
Int(n)	返回数字的整数部分。8.4-->9
Fix(n)	返回数字的整数部分。8.4-->8

以上函数在VB6和VBScript中都适用，在。NET里面要在前面加上相应的命名空间，如System.Math.Cos()，Microsoft.VisualBasic.Hour()。