DateAndTime.DatePart Metoda

Zdroj:

DateAndTime.vb

Zdroj:

DateAndTime.vb

Zdroj:

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

Parametry

Návraty

Celočíselná hodnota obsahující zadanou komponentu dané hodnoty Date.

Výjimky

Příklady

Tento příklad používá datum a pomocí funkce DatePart zobrazí čtvrtletí roku, ve kterém se vyskytuje.

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)

Poznámky

Pomocí funkce DatePart můžete vyhodnotit hodnotu data a času a vrátit konkrétní komponentu. Můžete například použít DatePart k výpočtu dne v týdnu nebo aktuální hodiny.

Pokud pro argument Interval zvolíte DateInterval.Weekday, vrácená hodnota je konzistentní s hodnotami FirstDayOfWeek výčtu. Pokud zvolíte DateInterval.WeekOfYear, DatePart použije Calendar a CultureInfo třídy oboru názvů System.Globalization k určení aktuálního nastavení.

Argument FirstDayOfWeekValue ovlivňuje výpočty, které používají nastavení DateInterval.Weekday a DateInterval.WeekOfYearInterval. Argument FirstWeekOfYearValue ovlivňuje výpočty, které určují DateInterval.WeekOfYear pro Interval.

Vzhledem k tomu, že každá Date hodnota je podporována strukturou DateTime, poskytují její metody další možnosti při načítání částí data a času. Můžete například získat celou hodnotu data Date proměnné s hodnotou času nastavenou na půlnoc následujícím způsobem:

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

Argument Interval může mít jedno z následujících nastavení.

Argument FirstDayOfWeekValue může mít jedno z následujících nastavení.

Argument FirstWeekOfYearValue může mít jedno z následujících nastavení.

Viz také

• DateAdd
• DateDiff
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• souhrn datových typů (Visual Basic)

Zdroj:

DateAndTime.vb

Zdroj:

DateAndTime.vb

Zdroj:

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

Parametry

Návraty

Celočíselná hodnota obsahující zadanou komponentu dané hodnoty Date.

Výjimky

Příklady

Tento příklad používá datum a pomocí funkce DatePart zobrazí čtvrtletí roku, ve kterém se vyskytuje.

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)

Poznámky

Pomocí funkce DatePart můžete vyhodnotit hodnotu data a času a vrátit konkrétní komponentu. Můžete například použít DatePart k výpočtu dne v týdnu nebo aktuální hodiny.

Pokud pro argument Interval zvolíte DateInterval.Weekday, vrácená hodnota je konzistentní s hodnotami FirstDayOfWeek výčtu. Pokud zvolíte DateInterval.WeekOfYear, DatePart použije Calendar a CultureInfo třídy oboru názvů System.Globalization k určení aktuálního nastavení.

Argument FirstDayOfWeekValue ovlivňuje výpočty, které používají nastavení DateInterval.Weekday a DateInterval.WeekOfYearInterval. Argument FirstWeekOfYearValue ovlivňuje výpočty, které určují DateInterval.WeekOfYear pro Interval.

Vzhledem k tomu, že každá Date hodnota je podporována strukturou DateTime, poskytují její metody další možnosti při načítání částí data a času. Můžete například získat celou hodnotu data Date proměnné s hodnotou času nastavenou na půlnoc následujícím způsobem:

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

Argument Interval může mít jedno z následujících nastavení.

Argument FirstDayOfWeekValue může mít jedno z následujících nastavení.

Argument FirstWeekOfYearValue může mít jedno z následujících nastavení.

Viz také

• DateAdd
• DateDiff
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• souhrn datových typů (Visual Basic)