Bart Aimar ha scritto:
> Allora i SystemTick sarebbero secondi?
No, i SystemTick dovrebbero essere scatti di un contatore interno al sistema
operativo
Dovrebbero variare da un sistema operativo ad un altro e la loro durata varia
in base alla velocità del PC
Se vuoi sapere quanti ticks ci sono in un secondo con il tuo SO e con il
tuo PC prova questa
Sub TicksPerSecondo()
lStartTick = getSystemTicks()
Wait 1000 ' Attesa di un secondo
lEndTick = getSystemTicks()
MsgBox "Total ticks = " & lEndTick - lStartTick
End Sub
Con il mio ci sono 1010 ticks
Nel codice che ti ho postato precedentemente c' erano due errori
getSystemTick() manca una s finale diventa getSystemTicks()
IEndtTick = getSystemTicks() c' è una t di troppo diventa lEndTick = ...
Se vuoi sapere quanti secondi dura un processo c' è la funzione Timer
restituisce i secondi passati dalla mezzanotte, la puoi usare così
Sub Durata_In_secondi()
Dim lStart As Long ' Queste due variabili devono essere dichiarate come
Dim lEnd As Long ' Long altrimenti vengono impostate nel formato ora
lStart = Timer
Wait 2000
lEnd = Timer
Secondi = lEnd - lStart
MsgBox "Tempo trascorso " & Secondi & " secondi"
End Sub
Ciao Lido
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
