DateAndTime.DatePart 方法
定义
重要
一些信息与预发行产品相关,相应产品在发行之前可能会进行重大修改。 对于此处提供的信息,Microsoft 不作任何明示或暗示的担保。
返回包含给定 Date
值的指定组件的整数值。
重载
DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear) |
返回包含给定 |
DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear) |
返回一个值,其中包含给定 |
DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)
- Source:
- DateAndTime.vb
- Source:
- DateAndTime.vb
- Source:
- DateAndTime.vb
返回包含给定 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 -> int
Public 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
,则使用 Calendar 命名空间的 System.Globalization 和 CultureInfo 类DatePart
来确定当前设置。
参数FirstDayOfWeekValue
会影响使用 和 DateInterval.WeekOfYear
Interval
设置的DateInterval.Weekday
计算。 参数FirstWeekOfYearValue
影响为 Interval
指定的DateInterval.WeekOfYear
计算。
由于结构支持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 | Minute |
DateInterval.Month |
m | Month |
DateInterval.Quarter |
q | Quarter |
DateInterval.Second |
s | 秒 |
DateInterval.Weekday |
w | 星期几(从 1 到 7) |
DateInterval.WeekOfYear |
ww | 年中的哪一周(从 1 到 53) |
DateInterval.Year |
yyyy | Year |
参数 FirstDayOfWeekValue
可以具有以下设置之一。
枚举值 | 值 | 说明 |
---|---|---|
FirstDayOfWeek.System |
0 | 在系统设置中指定的一周的第一天 |
FirstDayOfWeek.Sunday |
1 | 星期日 (默认) |
FirstDayOfWeek.Monday |
2 | Monday (符合 ISO 标准 8601 第 3.17 节) |
FirstDayOfWeek.Tuesday |
3 | 星期二 |
FirstDayOfWeek.Wednesday |
4 | 星期三 |
FirstDayOfWeek.Thursday |
5 | 星期四 |
FirstDayOfWeek.Friday |
6 | 星期五 |
FirstDayOfWeek.Saturday |
7 | 星期六 |
参数 FirstWeekOfYearValue
可以具有以下设置之一。
枚举值 | 值 | 说明 |
---|---|---|
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)
- Source:
- DateAndTime.vb
- Source:
- DateAndTime.vb
- Source:
- DateAndTime.vb
返回一个值,其中包含给定 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);
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 -> int
Public 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
,则使用 Calendar 命名空间的 System.Globalization 和 CultureInfo 类DatePart
来确定当前设置。
参数FirstDayOfWeekValue
会影响使用 和 DateInterval.WeekOfYear
Interval
设置的DateInterval.Weekday
计算。 参数FirstWeekOfYearValue
影响为 Interval
指定的DateInterval.WeekOfYear
计算。
由于结构支持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 | Minute |
DateInterval.Month |
m | Month |
DateInterval.Quarter |
q | Quarter |
DateInterval.Second |
s | 秒 |
DateInterval.Weekday |
w | 星期几(从 1 到 7) |
DateInterval.WeekOfYear |
ww | 年中的哪一周(从 1 到 53) |
DateInterval.Year |
yyyy | Year |
参数 FirstDayOfWeekValue
可以具有以下设置之一。
枚举值 | 值 | 说明 |
---|---|---|
FirstDayOfWeek.System |
0 | 在系统设置中指定的一周的第一天 |
FirstDayOfWeek.Sunday |
1 | 星期日 (默认) |
FirstDayOfWeek.Monday |
2 | Monday (符合 ISO 标准 8601 第 3.17 节) |
FirstDayOfWeek.Tuesday |
3 | 星期二 |
FirstDayOfWeek.Wednesday |
4 | 星期三 |
FirstDayOfWeek.Thursday |
5 | 星期四 |
FirstDayOfWeek.Friday |
6 | 星期五 |
FirstDayOfWeek.Saturday |
7 | 星期六 |
参数 FirstWeekOfYearValue
可以具有以下设置之一。
枚举值 | 值 | 说明 |
---|---|---|
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)
适用于
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈