Fonction Timer

Renvoie le nombre de secondes écoulées depuis 00 h 00 (minuit).

Syntaxe

Timer

Remarques

L'exemple suivant utilise la fonction Timer pour déterminer le temps nécessaire à l'itération d'une boucle For...Next N fois :

Exemple :

Function TimeIt(N)
   Dim StartTime, EndTime
   StartTime = Timer
   For I = 1 To N
   Next
   EndTime = Timer
   TimeIt = EndTime - StartTime
End Function

Dim N, Duration
N = 1000000   ' Number of iterations.
Duration = TimeIt(N)