Ottenere la differenza temporale fra due orari

Per ottenere la differenza temporale fra due orari, è possibile adottare almeno tre modalità: con l'uso statico della Classe Timer, con la funzione Time() e con la funzione ".DateDiff()", la quale ultima risulta essere la più precisa.

Mostriamo i tre casi:

Public Sub Main()

 Dim f As Float
 Dim tm As Date

 f = Timer
 Wait 1
 Print Timer - f

 tm = Time
 Wait 1
 Print Time - tm

 tm = Time
 Wait 1
 Print DateDiff(tm, Time, gb.Second)

End