Module
Contents
Index 🔎︎

# WeekDay Function

Tagastab funktsiooni DateSerial või DateValue loodud kuupäeva järjenumbrile vastava nädalapäeva.

## Süntaks:

    WeekDay (arv)

## Tagastusväärtus:

Täisarv

## Parameetrid:

Number: täisarvavaldis, mis sisaldab nädalapäeva arvutamiseks kasutatavat kuupäeva järjenumbrit (1-7).

Järgmises näites määratakse funktsiooni WeekDay abil sisestatud kuupäeva järgi nädalapäev.

## Error codes:

5 Vigane protseduuri väljakutse

## Näide:

    Sub ExampleWeekDay

    Dim sDay As String

    REM Tagastab ja kuvab nädalapäeva

        Select Case WeekDay( Now )

            Case 1

                sDay="Pühapäev"

            Case 2

                sDay="Esmaspäev"

            Case 3

                sDay="Teisipäev"

            Case 4

                sDay="Kolmapäev"

            Case 5

                sDay="Neljapäev"

            Case 6

                sDay="Reede"

            Case 7

                sDay="Laupäev"

        End Select

        msgbox "" + sDay,64,"Täna on"

    End Sub