Weekday-Funktion (Visual Basic)

Aktualisiert: November 2007

Gibt einen Integer-Wert mit einer Zahl zurück, die den Wochentag darstellt.

Public Function Weekday( _
   ByVal DateValue As DateTime, _
   Optional ByVal DayOfWeek As FirstDayOfWeek = FirstDayOfWeek.Sunday _
) As Integer

Parameter

DateValue
Erforderlich. Der Date-Wert, für den der Wochentag ermittelt werden soll.
DayOfWeek
Optional. Ein Wert aus der FirstDayOfWeek-Enumeration, der den ersten Tag der Woche angibt. Wenn diese Angabe fehlt, wird FirstDayOfWeek.Sunday verwendet.

Einstellungen

Das DayOfWeek-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

Ausnahmen

Ausnahmetyp	Fehlernummer	Bedingung
ArgumentException	5	DayOfWeek ist kleiner als 0 oder größer als 7.

Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine 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

Der von der Weekday-Funktion zurückgegebene Wert ist der Wochentag, auf den sich der DateValue bezieht, und zwar relativ zum ersten Wochentag, der durch den DayOfWeek-Wert definiert wird. Wenn sich z. B. das Datum auf einen Mittwoch bezieht und der erste Wochentag als Montag angegeben ist, gibt die Funktion 3 zurück.

Hinweis:
Weekday verwendet die aktuelle Kalendereinstellung aus der CurrentCulture-Eigenschaft der CultureInfo-Klasse im System.Globalization-Namespace. Die Standardwerte für CurrentCulture werden durch die Einstellungen in der Systemsteuerung festgelegt.

Beispiel

In diesem Beispiel wird die Weekday-Funktion verwendet, um den Wochentag eines angegebenen Datums zu ermitteln.

Dim oldDate As Date
Dim oldWeekDay As Integer
oldDate = #2/12/1969#
oldWeekDay = Weekday(oldDate)
' oldWeekDay now contains 4 because thisDate represents a Wednesday.