DateAndTime.DatePart メソッド

ソース:

DateAndTime.vb

ソース:

DateAndTime.vb

ソース:

DateAndTime.vb

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

パラメーター

戻り値

指定した 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.WeekOfYearを選択した場合、DatePart は System.Globalization 名前空間の Calendar クラスと CultureInfo クラスを使用して現在の設定を決定します。

FirstDayOfWeekValue 引数は、DateInterval.Weekday と DateInterval.WeekOfYearInterval の設定を使用する計算に影響します。 FirstWeekOfYearValue 引数は、Intervalの DateInterval.WeekOfYear を指定する計算に影響します。

すべての Date 値は DateTime 構造体でサポートされているため、そのメソッドを使用すると、日付/時刻部分を取得するための追加のオプションが提供されます。 たとえば、次のように、時刻値を午前 0 時に設定して、Date 変数の日付値全体を取得できます。

Dim CurrDatTim As Date = Now   ' Current date and time.  
Dim LastMidnight As Date = CurrDatTim.Date   ' At midnight.  

Interval 引数には、次のいずれかの設定を指定できます。

FirstDayOfWeekValue 引数には、次のいずれかの設定を指定できます。

FirstWeekOfYearValue 引数には、次のいずれかの設定を指定できます。

こちらもご覧ください

• DateAdd
• DateDiff
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• データ型の概要 (Visual Basic)

ソース:

DateAndTime.vb

ソース:

DateAndTime.vb

ソース:

DateAndTime.vb

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

パラメーター

戻り値

指定した 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.WeekOfYearを選択した場合、DatePart は System.Globalization 名前空間の Calendar クラスと CultureInfo クラスを使用して現在の設定を決定します。

FirstDayOfWeekValue 引数は、DateInterval.Weekday と DateInterval.WeekOfYearInterval の設定を使用する計算に影響します。 FirstWeekOfYearValue 引数は、Intervalの DateInterval.WeekOfYear を指定する計算に影響します。

すべての Date 値は DateTime 構造体でサポートされているため、そのメソッドを使用すると、日付/時刻部分を取得するための追加のオプションが提供されます。 たとえば、次のように、時刻値を午前 0 時に設定して、Date 変数の日付値全体を取得できます。

Dim CurrDatTim As Date = Now   ' Current date and time.  
Dim LastMidnight As Date = CurrDatTim.Date   ' At midnight.  

Interval 引数には、次のいずれかの設定を指定できます。

FirstDayOfWeekValue 引数には、次のいずれかの設定を指定できます。

FirstWeekOfYearValue 引数には、次のいずれかの設定を指定できます。

こちらもご覧ください

• DateAdd
• DateDiff
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• データ型の概要 (Visual Basic)