IBM Lotus Symphony


Função TimeSerial [Tempo de Execução]

Calcula um valor de tempo serial para os parâmetros de hora, minuto e segundo especificados que são transmitidos como valor numérico. É possível usar esse valor para calcular a diferença entre os tempos.

Sintaxe:

TimeSerial (hour, minute, second)

Valores de Retorno:

Data

Parâmetros:

hour: Qualquer expressão inteira que indica a hora do tempo usado para determinar o valor do tempo serial. Valores válidos: 0 a 23.

minute: Qualquer expressão inteira que indica o minuto do tempo usado para determinar o valor do tempo serial. Em geral, use os valores entre 0 e 59. Entretanto, é possível também usar os valores que estejam fora desse intervalo, em que o número de minutos influencia o valor da hora.

second: Qualquer expressão inteira que indica o segundo do tempo usado para determinar o valor do tempo serial. Em geral, é possível usar valores entre 0 e 59. Entretanto, é possível também usar os valores que estejam fora desse intervalo, em que o número de segundos influencia o valor do minuto.

Exemplos:

12, -5, 45 corresponde a 11, 55, 45

12, 61, 45 corresponde a 13, 2, 45

12, 20, -2 corresponde a 12, 19, 58

12, 20, 63 corresponde a 12, 21, 4

É possível usar a função TimeSerial para converter qualquer hora em um valor único que possa usar para calcular as diferenças de tempo.

A função TimeSerial retorna o tipo Variante com VarType 7 (Date). Esse valor é armazenado internamente como um número de dupla precisão entre 0 e 0.9999999999. Ao contrário da função DateSerial ou DateValue, em que os valores de data serial são calculados como dias relativos a uma data fixa, é possível calcular com os valores retornados pela função TimeSerial, porém não pode avaliá-los. Na função TimeValue, é possível transmitir uma sequência como uma parâmetro que contenha o tempo. No entanto, para a função TimeSerial, é possível transmitir os parâmetros individuais (hour, minute, second) como expressões numéricas separadas.

Na função TimeValue, é possível transmitir uma sequência como uma parâmetro que contenha a hora. No entanto, para a função TimeSerial, é possível transmitir os parâmetros individuais (hour, minute, second) como expressões numéricas separadas.

Códigos de Erro

5 Chamada de procedimento inválida

Exemplo:

Sub ExampleTimeSerial

Dim dDate As Double, sDate As String

dDate = TimeSerial(8,30,15)

sDate = TimeSerial(8,30,15)

MsgBox dDate,64,"Time as a number"

MsgBox sDate,64,"Formatted time"

End Sub


Feedback do Produto | Documentação Adicional | Marcas Registradas