Temporizador

Devolve o número de segundos decorridos desde as 00:00 (meia-noite).

Estrutura

Temporizador

Exemplo

O exemplo seguinte utiliza a função Timer para determinar o tempo que demora a executar um ciclo For...Next N vezes:

Função TimeIt(N)

Dim StartTime, EndTime

StartTime = Timer

For I = 1 To N

Next

EndTime = Timer

TimeIt = EndTime - StartTime

End Function |