IBM Lotus Symphony


Função WeekDay [Runtime]

Devolve o número correspondente ao dia da semana representado por um número de data em série gerado pela função DateSerial ou DateValue.

Sintaxe:

WeekDay (Number)

Valor de retorno:

Integer

Parâmetros:

Number: Expressão de números inteiros que contém o número de data em série utilizado para calcular o dia da semana (1-7).

O exemplo que se segue determina o dia da semana utilizando a função WeekDay quando se introduz uma data.

Códigos de erro

5 Chamada de procedimento não válido

Exemplo:

Sub ExampleWeekDay

Dim sDay As String

REM Devolve e apresenta o dia da semana

Select Case WeekDay( Now )

case 1

sDay="Sunday"

case 2

sDay="Monday"

case 3

sDay="Tuesday"

case 4

sDay="Wednesday"

case 5

sDay="Thursday"

case 6

sDay="Friday"

case 7

sDay="Saturday"

End Select

msgbox "" + sDay,64,"Today is"

End Sub


Comentários sobre o produto | Documentação adicional | Marcas comerciais