Module
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