DateAndTime.DatePart 方法
定义
重要
一些信息与预发行产品相关，相应产品在发行之前可能会进行重大修改。 对于此处提供的信息，Microsoft 不作任何明示或暗示的担保。
返回一个整数值，该值包含给定 Date 值的指定组件。
重载
| 名称 | 说明 |
|---|---|
| DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear) |
返回一个整数值，该值包含给定 |
| DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear) |
返回一个值，该值包含给定 |
DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)
返回一个整数值，该值包含给定 Date 值的指定组件。
public static int DatePart(Microsoft.VisualBasic.DateInterval Interval, DateTime DateValue, Microsoft.VisualBasic.FirstDayOfWeek FirstDayOfWeekValue = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear FirstWeekOfYearValue = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);static member DatePart : Microsoft.VisualBasic.DateInterval * DateTime * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> intPublic Function DatePart (Interval As DateInterval, DateValue As DateTime, Optional FirstDayOfWeekValue As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional FirstWeekOfYearValue As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Integer参数
- Interval
- DateInterval
必填。 枚举 DateInterval 值或表示要返回的日期/时间值的一部分的字符串表达式。
- DateValue
- DateTime
必填。
Date要计算的值。
- FirstDayOfWeekValue
- FirstDayOfWeek
可选。 从 FirstDayOfWeek 枚举中选择的值，该值指定一周的第一天。 如果未指定，则使用 Sunday。
- FirstWeekOfYearValue
- FirstWeekOfYear
可选。 从 FirstWeekOfYear 枚举中选择的值，该值指定年份的第一周。 如果未指定，则使用 Jan1。
返回
一个包含给定 Date 值的指定组件的整数值。
例外
Interval 无效。
DateValue 是不能强制的 Date。
示例
此示例采用日期，并使用 DatePart 函数显示其发生的年份的季度。
Dim DateString, Msg As String
Dim ActualDate As Date
' Enter February 12, 2008, or 2/12/2008.
DateString = InputBox("Enter a date:")
ActualDate = CDate(DateString)
' The first two examples use enumeration values for the interval.
Msg = "Quarter: " & DatePart(DateInterval.Quarter, ActualDate)
' The quarter is 1.
MsgBox(Msg)
Msg = "The day of the month: " & DatePart(DateInterval.Day, ActualDate)
' The day of the month is 12.
MsgBox(Msg)
' The next two examples use string values for the interval parameter.
Msg = "The week of the year: " & DatePart("ww", ActualDate)
' The week of the year is 7.
MsgBox(Msg)
Msg = "The day of the week: " & DatePart("w", ActualDate)
' The day of the week is 3 (Tuesday).
MsgBox(Msg)
注解
可以使用函数 DatePart 来评估日期/时间值并返回特定组件。 例如，可用于 DatePart 计算星期几或当前小时。
如果选择 DateInterval.Weekday 参数 Interval ，则返回的值与枚举的值 FirstDayOfWeek 一致。 如果选择DateInterval.WeekOfYear，DatePart请使用Calendar命名空间的System.Globalization和CultureInfo类来确定当前设置。
该FirstDayOfWeekValue参数会影响使用和DateInterval.WeekOfYearInterval设置的DateInterval.Weekday计算。 该FirstWeekOfYearValue自变量会影响指定的DateInterval.WeekOfYearInterval计算。
由于结构支持DateTime每个Date值，因此其方法提供了检索日期/时间部分的其他选项。 例如，可以获取变量的 Date 整个日期值，时间值设置为午夜，如下所示：
Dim CurrDatTim As Date = Now ' Current date and time.
Dim LastMidnight As Date = CurrDatTim.Date ' At midnight.
该 Interval 参数可以具有以下设置之一。
| 枚举值 | String | 要返回的日期/时间值的一部分 |
|---|---|---|
DateInterval.Day |
d | 月日（1 至 31 日） |
DateInterval.DayOfYear |
y | 一年中的一天 （1 到 366） |
DateInterval.Hour |
h | 小时 |
DateInterval.Minute |
n | 分钟 |
DateInterval.Month |
m | 月份 |
DateInterval.Quarter |
q | 季度 |
DateInterval.Second |
s | Second |
DateInterval.Weekday |
w | 星期几 （1 到 7） |
DateInterval.WeekOfYear |
ww | 一周 （1 到 53） |
DateInterval.Year |
yyyy | Year |
该 FirstDayOfWeekValue 参数可以具有以下设置之一。
| 枚举值 | 价值 | Description |
|---|---|---|
FirstDayOfWeek.System |
0 | 系统设置中指定的第一周的第一天 |
FirstDayOfWeek.Sunday |
1 | 周日 (默认) |
FirstDayOfWeek.Monday |
2 | 星期一（符合 ISO 标准 8601 第 3.17 节） |
FirstDayOfWeek.Tuesday |
3 | Tuesday |
FirstDayOfWeek.Wednesday |
4 | Wednesday |
FirstDayOfWeek.Thursday |
5 | Thursday |
FirstDayOfWeek.Friday |
6 | Friday |
FirstDayOfWeek.Saturday |
7 | Saturday |
该 FirstWeekOfYearValue 参数可以具有以下设置之一。
| 枚举值 | 价值 | Description |
|---|---|---|
FirstWeekOfYear.System |
0 | 系统设置中指定的第一周年份 |
FirstWeekOfYear.Jan1 |
1 | 1 月 1 日发生的周（默认值） |
FirstWeekOfYear.FirstFourDays |
2 | 新年至少有四天的周（符合 ISO 标准 8601 第 3.17 节） |
FirstWeekOfYear.FirstFullWeek |
3 | 新年的第一整周 |
另请参阅
- DateAdd
- DateDiff
- Day(DateTime)
- Format(Object, String)
- Now
- Weekday(DateTime, FirstDayOfWeek)
- Year(DateTime)
- System
- 数据类型摘要 （Visual Basic）
适用于
DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)
返回一个值，该值包含给定 Date 值的指定组件。
public static int DatePart(string Interval, object DateValue, Microsoft.VisualBasic.FirstDayOfWeek DayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Microsoft.VisualBasic.FirstWeekOfYear WeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1);static member DatePart : string * obj * Microsoft.VisualBasic.FirstDayOfWeek * Microsoft.VisualBasic.FirstWeekOfYear -> intPublic Function DatePart (Interval As String, DateValue As Object, Optional DayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.Sunday, Optional WeekOfYear As FirstWeekOfYear = Microsoft.VisualBasic.FirstWeekOfYear.Jan1) As Integer参数
- Interval
- String
必填。 枚举 DateInterval 值或表示要返回的日期/时间值的一部分的字符串表达式。
- DateValue
- Object
必填。
Date要计算的值。
- DayOfWeek
- FirstDayOfWeek
可选。 从 FirstDayOfWeek 枚举中选择的值，该值指定一周的第一天。 如果未指定，则使用 Sunday。
- WeekOfYear
- FirstWeekOfYear
可选。 从 FirstWeekOfYear 枚举中选择的值，该值指定年份的第一周。 如果未指定，则使用 Jan1。
返回
一个包含给定 Date 值的指定组件的整数值。
例外
Interval 无效。
DateValue 是不能强制的 Date。
示例
此示例采用日期，并使用 DatePart 函数显示其发生的年份的季度。
Dim DateString, Msg As String
Dim ActualDate As Date
' Enter February 12, 2008, or 2/12/2008.
DateString = InputBox("Enter a date:")
ActualDate = CDate(DateString)
' The first two examples use enumeration values for the interval.
Msg = "Quarter: " & DatePart(DateInterval.Quarter, ActualDate)
' The quarter is 1.
MsgBox(Msg)
Msg = "The day of the month: " & DatePart(DateInterval.Day, ActualDate)
' The day of the month is 12.
MsgBox(Msg)
' The next two examples use string values for the interval parameter.
Msg = "The week of the year: " & DatePart("ww", ActualDate)
' The week of the year is 7.
MsgBox(Msg)
Msg = "The day of the week: " & DatePart("w", ActualDate)
' The day of the week is 3 (Tuesday).
MsgBox(Msg)
注解
可以使用函数 DatePart 来评估日期/时间值并返回特定组件。 例如，可用于 DatePart 计算星期几或当前小时。
如果选择 DateInterval.Weekday 参数 Interval ，则返回的值与枚举的值 FirstDayOfWeek 一致。 如果选择DateInterval.WeekOfYear，DatePart请使用Calendar命名空间的System.Globalization和CultureInfo类来确定当前设置。
该FirstDayOfWeekValue参数会影响使用和DateInterval.WeekOfYearInterval设置的DateInterval.Weekday计算。 该FirstWeekOfYearValue自变量会影响指定的DateInterval.WeekOfYearInterval计算。
由于结构支持DateTime每个Date值，因此其方法提供了检索日期/时间部分的其他选项。 例如，可以获取变量的 Date 整个日期值，时间值设置为午夜，如下所示：
Dim CurrDatTim As Date = Now ' Current date and time.
Dim LastMidnight As Date = CurrDatTim.Date ' At midnight.
该 Interval 参数可以具有以下设置之一。
| 枚举值 | String | 要返回的日期/时间值的一部分 |
|---|---|---|
DateInterval.Day |
d | 月日（1 至 31 日） |
DateInterval.DayOfYear |
y | 一年中的一天 （1 到 366） |
DateInterval.Hour |
h | 小时 |
DateInterval.Minute |
n | 分钟 |
DateInterval.Month |
m | 月份 |
DateInterval.Quarter |
q | 季度 |
DateInterval.Second |
s | Second |
DateInterval.Weekday |
w | 星期几 （1 到 7） |
DateInterval.WeekOfYear |
ww | 一周 （1 到 53） |
DateInterval.Year |
yyyy | Year |
该 FirstDayOfWeekValue 参数可以具有以下设置之一。
| 枚举值 | 价值 | Description |
|---|---|---|
FirstDayOfWeek.System |
0 | 系统设置中指定的第一周的第一天 |
FirstDayOfWeek.Sunday |
1 | 周日 (默认) |
FirstDayOfWeek.Monday |
2 | 星期一（符合 ISO 标准 8601 第 3.17 节） |
FirstDayOfWeek.Tuesday |
3 | Tuesday |
FirstDayOfWeek.Wednesday |
4 | Wednesday |
FirstDayOfWeek.Thursday |
5 | Thursday |
FirstDayOfWeek.Friday |
6 | Friday |
FirstDayOfWeek.Saturday |
7 | Saturday |
该 FirstWeekOfYearValue 参数可以具有以下设置之一。
| 枚举值 | 价值 | Description |
|---|---|---|
FirstWeekOfYear.System |
0 | 系统设置中指定的第一周年份 |
FirstWeekOfYear.Jan1 |
1 | 1 月 1 日发生的周（默认值） |
FirstWeekOfYear.FirstFourDays |
2 | 新年至少有四天的周（符合 ISO 标准 8601 第 3.17 节） |
FirstWeekOfYear.FirstFullWeek |
3 | 新年的第一整周 |
另请参阅
- DateAdd
- DateDiff
- Day(DateTime)
- Format(Object, String)
- Now
- Weekday(DateTime, FirstDayOfWeek)
- Year(DateTime)
- System
- 数据类型摘要 （Visual Basic）