WeekDay Function

Visszaadja a DateSerial vagy DateValue függvény által meghatározott soros dátumértéknek megfelelő hétköznap számát.

Szintaxis:

WeekDay (Szám)

Visszatérési érték:

Integer (egész szám)

Paraméterek:

Szám: Integer (egész szám) kifejezés, amely a hét egy napjának(1-7) kiszámítására használt soros dátumértéket tartalmazza.

Az alábbi példa meghatározza egy dátum megadásánál a hétköznapot a WeekDay függvény segítségével.

Error codes:

5 Érvénytelen eljáráshívás

PĂ©lda:

Sub ExampleWeekDay

Dim sDay As String

' Visszaadja és megjeleníti a hétköznapot

    Select Case WeekDay( Now )

        Case 1

            sDay="Vasárnap"

        Case 2

            sDay="Hétfő"

        Case 3

            sDay="Kedd"

        Case 4

            sDay="Szerda"

        Case 5

            sDay="Csütörtök"

        Case 6

            sDay="PĂ©ntek"

        Case 7

            sDay="Szombat"

    End Select

    MsgBox "" + sDay,64,"A mai nap"

End Sub