共用方式為


DateAndTime.DatePart 方法

定義

傳回整數值,其中包含指定之 Date 值的指定元件。

多載

DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)

傳回整數值,其中包含指定之 Date 值的指定元件。

DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)

傳回值,其中包含指定之 Date 值的指定元件。

DatePart(DateInterval, DateTime, FirstDayOfWeek, FirstWeekOfYear)

來源:
DateAndTime.vb
來源:
DateAndTime.vb
來源:
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 來計算星期數或目前小時。

如果您選擇 Interval 自變數的 DateInterval.Weekday,傳回的值會與 FirstDayOfWeek 列舉的值一致。 如果您選擇 DateInterval.WeekOfYearDatePart 會使用 System.Globalization 命名空間 CalendarCultureInfo 類別來判斷目前的設定。

FirstDayOfWeekValue 自變數會影響使用 DateInterval.WeekdayDateInterval.WeekOfYearInterval 設定的計算。 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 自變數可以具有下列其中一個設定。

列舉值 字串 要傳回的日期/時間值的一部分
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 第二
DateInterval.Weekday w 一周中的一天 (1 到 7)
DateInterval.WeekOfYear ww 年周 (1 到 53 歲)
DateInterval.Year yyyy

FirstDayOfWeekValue 自變數可以具有下列其中一個設定。

列舉值 價值 描述
FirstDayOfWeek.System 0 系統設定中指定的第一周第一天
FirstDayOfWeek.Sunday 1 星期日 (預設值)
FirstDayOfWeek.Monday 2 星期一 (符合 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 新年的第一個完整周

另請參閱

適用於

DatePart(String, Object, FirstDayOfWeek, FirstWeekOfYear)

來源:
DateAndTime.vb
來源:
DateAndTime.vb
來源:
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 來計算星期數或目前小時。

如果您選擇 Interval 自變數的 DateInterval.Weekday,傳回的值會與 FirstDayOfWeek 列舉的值一致。 如果您選擇 DateInterval.WeekOfYearDatePart 會使用 System.Globalization 命名空間 CalendarCultureInfo 類別來判斷目前的設定。

FirstDayOfWeekValue 自變數會影響使用 DateInterval.WeekdayDateInterval.WeekOfYearInterval 設定的計算。 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 自變數可以具有下列其中一個設定。

列舉值 字串 要傳回的日期/時間值的一部分
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 第二
DateInterval.Weekday w 一周中的一天 (1 到 7)
DateInterval.WeekOfYear ww 年周 (1 到 53 歲)
DateInterval.Year yyyy

FirstDayOfWeekValue 自變數可以具有下列其中一個設定。

列舉值 價值 描述
FirstDayOfWeek.System 0 系統設定中指定的第一周第一天
FirstDayOfWeek.Sunday 1 星期日 (預設值)
FirstDayOfWeek.Monday 2 星期一 (符合 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 新年的第一個完整周

另請參閱

適用於