Visual Basic DateDiff 函数

定义和用法

DateDiff 函数可返回两个日期之间的时间间隔数。

DateDiff 函数用于计算两日期时间的差值,计算方法是 date2 - date1

若比较年份,则不管月份以下的数值,若比较月份,则不管天数以下的数值…… 以此类推。

注释:firstdayofweek 参数会对使用 "w" 和 "ww" 间隔符号的计算产生影响。

语法
  1. DateDiff(interval,date1,date2[,firstdayofweek[,firstweekofyear]])
参数描述
interval

必需的。计算 date1 和 date2 之间的时间间隔的单位。

可采用下面的值:

  • yyyy - 年
  • q - 季度
  • m - 月
  • y - 当年的第几天
  • d - 日
  • w - 当周的第几天
  • ww - 周
  • h - 小时
  • n - 分钟
  • s - 秒
date1,date2必需的。日期表达式。在计算中需要使用的两个日期。
firstdayofweek

可选的。规定一周的日数,即当周的第几天。

可采用下面的值:

  • 0 = vbUseSystemDayOfWeek - 使用区域语言支持 (NLS) API 设置。
  • 1 = vbSunday - 星期日 (默认)
  • 2 = vbMonday - 星期一
  • 3 = vbTuesday - 星期二
  • 4 = vbWednesday - 星期三
  • 5 = vbThursday - 星期四
  • 6 = vbFriday - 星期五
  • 7 = vbSaturday - 星期六
firstweekofyear

可选的。规定一年中的第一周。

可采用下面的值:

  • 0 = vbUseSystem - 使用区域语言支持 (NLS) API 设置。
  • 1 = vbFirstJan1 - 由 1 月 1 日所在的星期开始(默认)。
  • 2 = vbFirstFourDays - 由在新年中至少有四天的第一周开始。
  • 3 = vbFirstFullWeek - 由在新的一年中第一个完整的周开始。

实例

例子 1
  1. Module Module1
  2. Sub Main()
  3. Console.WriteLine(New Date() & "<br />")
  4. Console.WriteLine(DateDiff("m", New Date(), CDate("12/31/2002")) & "<br />")
  5. Console.WriteLine(DateDiff("d", New Date(), CDate("12/31/2002")) & "<br />")
  6. Console.WriteLine(DateDiff("n", New Date(), CDate("12/31/2002")))
  7. End Sub
  8. End Module

输出:

  1. 1/14/2002
  2. 11
  3. 351
  4. 505440
例子 2

请注意在下面的代码中,date1>date2:

  1. Module Module1
  2. Sub Main()
  3. Console.WriteLine(New Date() & "<br />")
  4. Console.WriteLine(DateDiff("d", CDate("12/31/2002"), New Date()))
  5. End Sub
  6. End Module

输出:

  1. 1/14/2002
  2. -351
例子 3
  1. Module Module1
  2. Sub Main()
  3. 'How many weeks (start on Monday),
  4. 'are left between the current date and 10/10/2002
  5. Console.WriteLine(New Date() & "<br />")
  6. Console.WriteLine(DateDiff("w", New Date(), CDate("12/31/2002"), vbMonday))
  7. End Sub
  8. End Module

输出:

  1. 1/14/2002
  2. 38

分类导航