Enhavo
Indekso 🔎︎

# WeekDay Function

Liveras la nombron kiu korespondas al la tago de la semajno reprezentita de la data numero generita de la funkcio DateSerial aŭ DateValue.

## Sintakso:

    WeekDay (Number)

## Liverota valoro:

Entjero

## Parametroj:

Number: Entjera esprimo kiu enhavas la datan numeron uzota por kalkuli la tagon de la semajno (1-7).

La jena ekzemplo kalkulas la tagon de la semajno per la funkcio WeekDay kiam oni enigas daton.

## Error codes:

5 Nevalida procedurvoko

## Ekzemplo:

    Sub ExampleWeekDay
    Dim sDay As String
    REM Liveri kaj vidigi la tagon de la semajno
        Select Case WeekDay( Now )
            Case 1
                sDay="dimanĉo"
            Case 2
                sDay="lundo"
            Case 3
                sDay="mardo"
            Case 4
                sDay="merkredo"
            Case 5
                sDay="ĵaŭdo"
            Case 6
                sDay="vendredo"
            Case 7
                sDay="sabato"
        End Select
        msgbox "" + sDay,64,"Hodiaŭ estas"
    End Sub