Função Time

Retorna uma Variante do subtipo Date indicando a hora atual do sistema.

Sintaxe

Time

Comentários

O exemplo a seguir usa a função Time para retornar a hora atual do sistema:

Exemplo 1:

Dim MyTime
MyTime = Time

Exemplo 2:

Dim MyTime1, MyHour, MyMinute, MySecond
MyTime1 = Time
MyHour = Hour(MyTime1)     
MyMinute = Minute(MyTime1)  
MySecond = Second(MyTime1)  

'Output: Current Time
'Output: Hour from Current Time
'Output: Minute from Current Time
'Output: Second from Current Time