Modulo
Contenuto
Indice 🔎︎

# Funzione WeekDay

Restituisce il numero corrispondente al giorno della settimana rappresentato da un numero seriale generato dalla funzione DateSerial o DateValue.

## Sintassi:

    WeekDay (Numero)

## Valore restituito:

Integer

## Parametri:

Numero: espressione numerica intera contenente il numero seriale usato per calcolare il giorno della settimana (1-7).

L'esempio seguente determina il giorno della settimana usando la funzione WeekDay quando inserite una data.

## Codici di errore:

5 Richiamo di procedura non valido

## Esempio:

    Sub ExampleWeekDay

    Dim sDay As String

    ' Restituisce e visualizza il giorno della settimana

        Select Case WeekDay( Now )

            Case 1

                sDay="Domenica"

            Case 2

                sDay="Lunedì"

            Case 3

                sDay="Martedì"

            Case 4

                sDay="Mercoledì"

            Case 5

                sDay="Giovedì"

            Case 6

                sDay="Venerdì"

            Case 7

                sDay="Sabato"

        End Select

        MsgBox "" + sDay,64,"Oggi è"

    End Sub