WeekDay Function (BASIC)

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.

Hibakódok:

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