DateAndTime.DatePart 方法

定義

回傳包含指定分量 Date 的整數值。

多載

名稱 Description
DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)

回傳包含指定分量 Date 的整數值。

DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)

回傳包含指定 Date 值成分的值。

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 -> 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

Optional. 從 FirstDayOfWeek 列舉中選出的數值,指定了一週的第一天。 如果未指定,就會使用 Sunday

FirstWeekOfYearValue
FirstWeekOfYear

Optional. 從列舉中選出 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 and CultureInfo 類別來決定你DatePart目前的設定。

這個 FirstDayOfWeekValue 參數會影響使用 DateInterval.WeekdayDateInterval.WeekOfYearInterval 設定的計算。 該FirstWeekOfYearValue參數影響指定 DateInterval.WeekOfYear 的計算。Interval

由於每個 Date 值都有 DateTime 結構支持,其方法提供了額外的日期/時間部分擷取選項。 例如,你可以取得變數的全部日期值 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 小時 小時
DateInterval.Minute n 分鐘
DateInterval.Month m
DateInterval.Quarter q 季度
DateInterval.Second s 第二個
DateInterval.Weekday w 星期幾(1 至 7 日)
DateInterval.WeekOfYear ww 年度週(1至53週)
DateInterval.Year yyyy

FirstDayOfWeekValue 論證可以有以下其中一種設定。

列舉值 Value 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 論證可以有以下其中一種設定。

列舉值 Value Description
FirstWeekOfYear.System 0 系統設定中指定的年度第一周
FirstWeekOfYear.Jan1 1 1 月 1 日發生的週 (預設值)
FirstWeekOfYear.FirstFourDays 2 新年至少有四天的周(符合 ISO 標準 8601 第 3.17 節)
FirstWeekOfYear.FirstFullWeek 3 新年第一個完整週

另請參閱

適用於

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 -> 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

Optional. 從 FirstDayOfWeek 列舉中選出的數值,指定了一週的第一天。 如果未指定,就會使用 Sunday

WeekOfYear
FirstWeekOfYear

Optional. 從列舉中選出 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 and CultureInfo 類別來決定你DatePart目前的設定。

這個 FirstDayOfWeekValue 參數會影響使用 DateInterval.WeekdayDateInterval.WeekOfYearInterval 設定的計算。 該FirstWeekOfYearValue參數影響指定 DateInterval.WeekOfYear 的計算。Interval

由於每個 Date 值都有 DateTime 結構支持,其方法提供了額外的日期/時間部分擷取選項。 例如,你可以取得變數的全部日期值 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 小時 小時
DateInterval.Minute n 分鐘
DateInterval.Month m
DateInterval.Quarter q 季度
DateInterval.Second s 第二個
DateInterval.Weekday w 星期幾(1 至 7 日)
DateInterval.WeekOfYear ww 年度週(1至53週)
DateInterval.Year yyyy

FirstDayOfWeekValue 論證可以有以下其中一種設定。

列舉值 Value 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 論證可以有以下其中一種設定。

列舉值 Value Description
FirstWeekOfYear.System 0 系統設定中指定的年度第一周
FirstWeekOfYear.Jan1 1 1 月 1 日發生的週 (預設值)
FirstWeekOfYear.FirstFourDays 2 新年至少有四天的周(符合 ISO 標準 8601 第 3.17 節)
FirstWeekOfYear.FirstFullWeek 3 新年第一個完整週

另請參閱

適用於