DatePart-Funktion (Visual Basic)

Aktualisiert: November 2007

Gibt einen Wert vom Typ Integer zurück, der eine bestimmte Komponente eines angegebenen Date-Werts enthält.

Public Overloads Function DatePart( _
   ByVal Interval As DateInterval, _
   ByVal DateValue As DateTime, _
   Optional ByVal FirstDayOfWeekValue As FirstDayOfWeek = VbSunday, _
   Optional ByVal FirstWeekOfYearValue As FirstWeekOfYear = VbFirstJan1 _
) As Integer
' -or-
Public Overloads Function DatePart( _
    ByVal Interval As String, _
   ByVal DateValue As Object, _
   Optional ByVal DayOfWeek As FirstDayOfWeek = FirstDayOfWeek.Sunday, _
   Optional ByVal WeekOfYear As FirstWeekOfYear = FirstWeekOfYear.Jan1 _
) As Integer

Parameter

  • Interval
    Erforderlich. Wert aus der DateInterval-Enumeration oder String-Ausdruck, der den Teil der Datums- und Uhrzeitangabe darstellt, der zurückgegeben werden soll.

  • DateValue
    Erforderlich. Wert vom Typ Date, der ermittelt werden soll.

  • FirstDayOfWeekValue, DayOfWeek
    Optional. Ein Wert aus der FirstDayOfWeek-Enumeration, der den ersten Tag der Woche angibt. Wird kein bestimmter Wert angegeben, wird FirstDayOfWeek.Sunday verwendet.

  • FirstWeekOfYearValue, WeekOfYear
    Optional. Ein Wert aus der FirstWeekOfYear-Enumeration, der die erste Woche des Jahres angibt. Wird kein bestimmter Wert angegeben, wird FirstWeekOfYear.Jan1 verwendet.

Einstellungen

Das Interval-Argument kann eine der folgenden Einstellungen haben.

Enumerationswert

Zeichenfolge

Zurückzugebender Teil der Datums- und Uhrzeitangabe

DateInterval.Day

d

Tag des Monats (1 bis 31)

DateInterval.DayOfYear

y

Tag des Jahres (1 bis 366)

DateInterval.Hour

h

Stunde

DateInterval.Minute

n

Minute

DateInterval.Month

m

Monat

DateInterval.Quarter

q

Quartal

DateInterval.Second

s

Sekunde

DateInterval.Weekday

w

Tag der Woche (1 bis 7)

DateInterval.WeekOfYear

ww

Woche des Jahres (1 bis 53)

DateInterval.Year

yyyy

Jahr

Das FirstDayOfWeekValue-Argument kann eine der folgenden Einstellungen haben.

Enumerationswert

Wert

Beschreibung

FirstDayOfWeek.System

0

Erster Tag der Woche laut Systemeinstellungen

FirstDayOfWeek.Sunday

1

Sonntag (Standardwert)

FirstDayOfWeek.Monday

2

Montag (entspricht ISO-Norm 8601, Abschnitt 3.17)

FirstDayOfWeek.Tuesday

3

Dienstag

FirstDayOfWeek.Wednesday

4

Mittwoch

FirstDayOfWeek.Thursday

5

Donnerstag

FirstDayOfWeek.Friday

6

Freitag

FirstDayOfWeek.Saturday

7

Samstag

Das FirstWeekOfYearValue-Argument kann eine der folgenden Einstellungen haben.

Enumerationswert

Wert

Beschreibung

FirstWeekOfYear.System

0

Erste Woche des Jahres laut Systemeinstellungen

FirstWeekOfYear.Jan1

1

Die Woche, in der der 1. Januar liegt (Standardwert)

FirstWeekOfYear.FirstFourDays

2

Die erste Woche im neuen Jahr, die mindestens vier Tage hat (entspricht ISO-Norm 8601, Abschnitt 3.17)

FirstWeekOfYear.FirstFullWeek

3

Die erste vollständige Woche im neuen Jahr

Ausnahmen

Ausnahmetyp

Fehlernummer

Bedingung

ArgumentException

5

Interval ist ungültig.

InvalidCastException

13

DateValue kann nicht in Date umgewandelt werden.

Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die die unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlersteuerung durch eine Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.

Hinweise

Mit der DatePart-Funktion wird eine Datums- und Uhrzeitangabe ausgewertet und eine bestimmte Komponente zurückgegeben. Sie können mit DatePart beispielsweise den Wochentag oder die aktuelle Stunde berechnen.

Wenn Sie DateInterval.Weekday für das Interval-Argument auswählen, entspricht der zurückgegebene Wert den Werten der FirstDayOfWeek-Enumeration. Wenn Sie DateInterval.WeekOfYear auswählen, verwendet DatePart die Calendar-Klasse und die CultureInfo-Klasse des System.Globalization-Namespace, um die aktuellen Einstellungen zu bestimmen.

Das FirstDayOfWeekValue-Argument beeinflusst Berechnungen, in denen die Einstellungen DateInterval.Weekday und DateInterval.WeekOfYear Interval verwendet werden. Das FirstWeekOfYearValue-Argument beeinflusst Berechnungen, in denen DateInterval.WeekOfYear für Interval angegeben wird.

Da jeder Date-Wert durch eine DateTime-Struktur unterstützt wird, erhalten Sie durch deren Methoden zusätzliche Möglichkeiten zum Abrufen von Datums- und Uhrzeitkomponenten. Sie können z. B. wie folgt den vollständigen Datumswert einer Date-Variablen abrufen, wenn für den Zeitwert Mitternacht festgelegt ist:

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

Beispiel

In diesem Beispiel wird ein Datum übernommen und mithilfe der DatePart-Funktion das Quartal des Jahres angezeigt, in dem sich das übergebene Datum befindet.

Dim FirstDate, Msg As String   'Declare variables.
Dim SecondDate As Date
FirstDate = InputBox("Enter a date:")
SecondDate = CDate(FirstDate)
Msg = "Quarter: " & DatePart(DateInterval.Quarter, SecondDate)
MsgBox(Msg)

Anforderungen

Namespace:Microsoft.VisualBasic

**Modul:**DateAndTime

**Assembly:**Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)

Siehe auch

Referenz

DateAdd-Funktion (Visual Basic)

DateDiff-Funktion (Visual Basic)

Day-Funktion (Visual Basic)

Format-Funktion

Now-Eigenschaft

Weekday-Funktion (Visual Basic)

Year-Funktion (Visual Basic)

Date-Datentyp (Visual Basic)

System