Visual Basic DatePart 函数

定义和用法

DatePart 函数可返回给定日期的指定部分。

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

语法
  1. DatePart(interval,date[,firstdayofweek[,firstweekofyear]])
参数描述
interval

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

可采用下面的值:

  • yyyy - 年
  • q - 季度
  • m - 月
  • y - 当年的第几天
  • d - 日
  • w - 当周的第几天
  • ww - 周
  • h - 小时
  • n - 分钟
  • s - 秒
date必需的。需计算的日期表达式。
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. Dim d = CDate("2/10/96 16:45:30")
  4. Console.WriteLine(DatePart("yyyy",d)) '输出:1996
  5. Console.WriteLine(DatePart("m",d)) '输出:2
  6. Console.WriteLine(DatePart("d",d)) '输出:10
  7. Console.WriteLine(DatePart("h",d)) '输出:16
  8. Console.WriteLine(DatePart("n",d)) '输出:45
  9. Console.WriteLine(DatePart("s",d)) '输出:30
  10. Console.WriteLine(DatePart("q",d)) '输出:1,2月是第1季
  11. Console.WriteLine(DatePart("y",d)) '输出:41210日是1996年的第41日。
  12. Console.WriteLine(DatePart("ww",d)) '输出:6,2月10日是1996年的第6周。
  13. Console.WriteLine(DatePart("w",d)) '输出:7210日在在1996年是第6周的第7日(星期六)。
  14. End Sub
  15. End Module

分类导航