WeekDay Function

Devuelve'l númberu correspondiente al día de la selmana representáu por un númberu de fecha serie que xenera la función DateSerial o DateValue.

Sintaxis:

WeekDay (Númberu)

Valor de torna:

Enteru

Parámetros:

Númberu: Espresión entera que contenga'l númberu de fecha serie que s'utilice pa determinar el día de la selmana (1-7).

L'exemplu siguiente determina'l día de la selmana cola función WeekDay cuando s'escribe una fecha.

Error codes:

5 Llamada a procedimientu non válida

Exemplu:

Sub ExampleWeekDay

Dim sDay As String

' Devuelve y amuesa'l día de la selmana

    Select Case WeekDay( Now )

        Case 1

            sDay="domingu"

        Case 2

            sDay="llunes"

        Case 3

            sDay="martes"

        Case 4

            sDay="miércoles"

        Case 5

            sDay="xueves"

        Case 6

            sDay="vienres"

        Case 7

            sDay="sábadu"

    End Select

    MsgBox "" + sDay,64,"Güei ye"

End Sub