Retorna um Simples que representa o número de segundos decorridos desde meia-noite.
Sintaxe
Timer
Comentários
No Microsoft Windows, a função Timer retorna partes fracionárias de um segundo. No Macintosh, a resolução do temporizador é de um segundo.
Exemplo de consulta
Expressão |
Resultados |
SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
Retorna o número de segundos decorridos desde a meia-noite com base na hora do sistema e é exibido na coluna SecondsPast. |
Exemplo de VBA
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função Timer para pausar o aplicativo. O exemplo também usa DoEvents para renderizar a outros processos durante a pausa.
Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _ 4)) = vbYes Then PauseTime = 5 ' Set duration. Start = Timer ' Set start time. Do While Timer < Start + PauseTime DoEvents ' Yield to other processes. Loop Finish = Timer ' Set end time. TotalTime = Finish - Start ' Calculate total time. MsgBox "Paused for " & TotalTime & " seconds" Else End End If