WeekDay Function (BASIC)

Weekday palauttaa viikonpÀivÀn numeron pÀivÀmÀÀrÀn sarjanumerosta, joka on tuotettu funktiolla DateSerial tai DateValue.

Syntax:


WeekDay (luku1)

Return value:

Integer-tyypin kokonaisluku

Parameters:

Luku1: numeerinen lauseke, jossa on pÀivÀmÀÀrÀsarjanumero, jota kÀytetÀÀn viikon pÀivÀn laskemiseen (1-7).

Seuraavassa esimerkissÀ kÀytetÀÀn WeekDay-funktiota viikonpÀivÀn mÀÀrittÀmiseen annetusta pÀivÀmÀÀrÀstÀ.

Error codes:

5 Virheellinen proseduurikutsu

Example:


Sub ExampleWeekDay
Dim sDay As String
' palautetaan ja esitetÀÀn viikonpÀivÀ
    Select Case WeekDay( Now )
        Case 1
            sDay="sunnuntai"
        Case 2
            sDay="maanantai"
        Case 3
            sDay="tiistai"
        Case 4
            sDay="keskiviikko"
        Case 5
            sDay="torstai"
        Case 6
            sDay="perjantai"
        Case 7
            sDay="lauantai"
    End Select
    msgbox "" + sDay,64,"TÀnÀÀn on"
End Sub

Please support us!