TimeSerial

Devolve um objeto Variant do subtipo Date que contém a hora, os minutos e os segundos de um determinado momento.

Estrutura

TimeSerial(hora, minuto, segundo)

Parâmetros

hora - Número entre 0 (00:00) e 23 (23h00), inclusive, ou uma expressão numérica.

minuto - Qualquer expressão numérica.

segundo - Qualquer expressão numérica.

Descrição

Para especificar uma hora, como 11:59:59, o intervalo de números para cada argumento TimeSerial deve estar dentro do intervalo permitido para a unidade; ou seja, 0 a 23 para as horas e 0 a 59 para os minutos e segundos. No entanto, também é possível especificar horários relativos para cada argumento utilizando qualquer expressão numérica que represente um determinado número de horas, minutos ou segundos antes ou depois de uma determinada hora.

Exemplo

O exemplo seguinte utiliza expressões em vez de valores numéricos de tempo absoluto. A função TimeSerial devolve uma hora correspondente a 15 minutos antes (-15) de seis horas antes do meio-dia (12 - 6), ou seja, 5:45:00 da manhã.

Dim MyTime1

MyTime1 = TimeSerial(12 - 6, -15, 0) ' Retorna 5:45:00 da manhã.

Quando um argumento excede o intervalo aceitável para esse argumento, ele é arredondado para a unidade superior, conforme apropriado. Por exemplo, se indicar 75 minutos, isso é interpretado como uma hora e 15 minutos. No entanto, se algum dos argumentos estiver fora do intervalo de -32 768 a 32 767, ou se a hora especificada pelas três estruturas, seja diretamente ou por meio de uma expressão, fizer com que a data fique fora do intervalo aceitável, ocorre um erro. |