IBM Lotus Symphony


Función WeekDay [Ejecución]

Devuelve el número correspondiente al día de la semana representado por un número de fecha serie que genera la función DateSerial o DateValue.

Sintaxis:

WeekDay (Número)

Valor de retorno:

Entero

Parámetros:

Número: Expresión entera que contenga el número de fecha serie que se utilice para determinar el día de la semana (1-7).

El ejemplo siguiente determina el día de la semana con la función WeekDay cuando se escribe una fecha.

Códigos de error

5 Inicio del proceso no válido

Ejemplo:

Sub EjemploWeekDay

Dim sDia As String

REM Devuelve y muestra el día de la semana

Select Case WeekDay( Now )

case 1

sDay="domingo"

case 2

sDay="lunes"

case 3

sDay="martes"

case 4

sDay="miércoles"

case 5

sDay="jueves"

case 6

sDay="viernes"

case 7

sDay="sábado"

End Select

msgbox "" + sDay,64,"Hoy es"

End Sub


Comentarios del producto | Documentación adicional | Marcas registradas