VB.NET函数——日期时间函数

<一> 获取/设置目前日期时间函数

（1）Now ()：返回系统目前的日期和时间。如：2007-3-29 早上10:38:22

（2）Today ()：返回或设置系统目前的日期。

（3）TimeOfDay ()：返回或设置系统目前的时间。

（4）DataString ()：以“yyy-mm-dd”格式返回或设置系统目前时间。

（5）Timer ()：以Double类型返回自午夜到今所经过的秒数和毫秒数，秒数是返回值的整数部分，毫秒数则是小数部分。

<二> 返回日期时间函数

（1）合并年月日成日期函数 DateSerial ()

格式：DateSerial (year As Integer,month As Integer,day As Integer ) As DateTime

说明：将参数所指定的年月日合并成日期返回，参数year的值须是介于1~9999的整数，若是介于0~99的整数，将被解释为1930~2029，若是小于1的整数，将自目前年底中减去；参数day的值须是介于1~31的整数，若是小于1的整数，将自目前日期中减去。例如：DateSerial (99,10,22)会返回#1999-10-22#；DateSerial (99,22-23)会返回#1999-9-29”；DateSerial (99,22+3)会返回#1999-10-25#。

（2）将字符串转换成日期函数 DateValue ()

格式：DateValue (str As String) As Date Time

说明：将参数转换成日期返回。参数str是表示由1年1月00：00：00到9999年12月31日23：59：59之间日期/时间值的字符串表达式。例如：DateValue (“Februay,12,1972”)会返回#1972-2-12#。

（3）合并时分秒成时间函数TimeSerial ()

格式：TimeSerial Chour As Integer,minute As Integer,Second As Integer ) As DateTime

说明：将参数所指定的时分秒合并成时间返回。参数hour的值必须是介于0~23的整数，若是小于1的整数，将自目前小时数中减去；参数minute和参数second的值须是介于0~59的整数，若是小于1的整数，将分别自目前分钟数与秒数中减去，例如：TimeSerial (12-6,-15,0)会返回上午06:45:00

（4）将字符串转换成时间函数TimeValue ()

格式：TimeValue (str As String) As DateTime

说明：将参数转换成时间返回。参数str是表示由1年1月1日00：00：00到9999年12月31日23：59：59之日期/时间值的字符串表达式。例如：TimeValue (“4:35:17 pm”) 会返回#下午04:35:17#。

（5）获取月份名称函数MonthName ()

格式：MonthName (month As Integer [,abbreviate As Boolean]) As String

说明：根据参数month的值返回月份的名称，例如：MonthName (12)会返回“十二月”字符串，参数month的类型为Integer；选择性参数abbreViate类型为Boolean，用来表示月份的名称能否被缩写。

（6）获取星期几名称函数WeekdayName ()

格式：WeekdayName (weekday As Integer [,abbreviate As Boolean [,dayofweek As FirstDayOfWeek ]]) AS String

说明：根据参数weekday的值返回星期几的名称，默认情况下，1，2~7会分别返回“星期日”、“星期一”~“星期六”；abbreviate用来表示星期几的名称能否被缩写，而选择性参数dayofweek的类型为FirstDayOfWeek枚举，用来表示一星期的第几天，默认为FirstDayOfWeek.System (0)，即采取系统设置中所指定的每周第一天，通常是星期日。如下表：

FirstDayOfWeek枚举成员	值	说明
FirstDayOfWeek.System	0	系统设置指定每周的第一天（默认值）
FirstDayOfWeek.Sunday	1	星期日
FirstDayOfWeek.Monday	2	星期一
FirstDayOfWeek.Tuesday	3	星期二
FirstDayOfWeek.Webnesday	4	星期三
FirstDayOfWeek.Thursday	5	星期四
FirstDayOfWeek.Friday	6	星期五
FirstDayOfWeek.Saturday	7	星期六

<三> 计算日期时间函数

（1）日期时间增减函数DateAdd ()

格式：DateAdd (interval As DateInerVal,number As Double,dt As DateTime ) As DateTime

说明：将参数dt指定的日期加上number个intval。例如：DateAdd (“m”,1,#11/25/1990#)会返回#1990/12/25#，其中interval为“m”，表示月份，number为“1”，dt为指定的日期，这个叙述的意义是将dt指定的日期加上1个月，DateAdd (“q”,2,#2001/1/31#)会返回#2001/7/31#，也就是#2001/1/31#加上两个季。Interval属于DateInterVal枚举，成员如下表：

成员	值	说明	成员	值	说明
DateInterVal.Year	yyyy	年	DateInterVal.Quarte	q	季
DateInterVal.Month	m	月	DateInterVal.DayOfYear	y	一年中的第几天
DateInterVal.Day	d	日	DateInterVal.Hour	h	小时
DateInterVal.WeekOfYear	ww	一年中的第几周	DateInterVal.DayOfWeek		一周中的星期几
DateInterVal.Minute	n	分钟	DateInterVal.Second	s	秒数

（2）日期时间差函数DateDiff ()

格式：DateDiff (interval As DateInterVal,dt1 As DateTime,dt2 As DateTime [,dayofweek As FirstDayOfWeek [,weekofyear As FirstWeekOfYear ]] As Long

说明：返回dat1和dat2 两个日期之间的间隔数，间隔单位为参数interval，例如：DateDiff (“m”,#12/15/1990#,##1/10/1990# )会返回-11，即两个日期相间隔11个月（第一个参数指定间隔单位为月；DateDiff (“d”,#12/5/90#,#12/15/90# )会返回10，即两个日期间隔10天（第一个参数指定间隔单位为天）。

参数interval属于DateInterVal枚举；选择性参数dayofweek可以省略，用来指定哪一天为一周的第一天，属于FirstDateOfWeek枚举，其值有FirstDayWeek.System (0),FirstDayWeek.Sunday (1),FirstDayWeek.Monday (2),FirstDayWeek.Tuesday (3),FirstDayWeek.Wednesday (4),FirstDayWeek.Saturday (5),FirstDayWeek.Friday (6),FirstDayWeek.Satuday (7)等8种；选择性参数weekofyear可以省略，用来指定哪一周为一年的第一周，属于FirstWeekOfYear枚举，其值有FirstWeelkOfYear.System (0)系统默认值、FirstWeelkOfYear.Jan (1)一月一日当周、FirstWeelkOfYear.FirstFourDays (2)新年度至少有4天在该周、FirstWeelkOfYear.FirstFullWeek (3)新年度的第一个完整星期等4种；例如：DateDiff (“ww”,dat1,1)会返回两个日期之间有几个星期日。

（3）获取日期时间的指定部份函数DatePart ()

格式：DatePart (interval As DateInterval,dt As DateTime [,weekofyear As FirstWeekOfYear ]])

说明： 返回特定日期指定部分。例如 DatePart (“y”,#9/11/92#) 会返回天数 255 ，因为 9 月 11 日 为 1992 年的第 255 天； DatePart (“w”,#8/22/2000) 会返回 3 ，表示为星期二。 DatePart () 函数的参数意义同 DateDiff () 函数。