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,10,22-23)会返回#1999-9-29”；DateSerial (99,10,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 [, dayofweek As FirstDayOfWeek [, weekofyear As FirstWeekOfYear ]])

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