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 |
---|---|---|
Interval ist ungültig. |
||
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)