[VB6] Eseguire comandi "a tempo"...

[WGH]

Ciao a tutti!
Avrei bisogno di eseguire dei comandi a tempo, in modo da verificare alcuni comportamenti del PC e delle sue periferiche...come si può fare?

Grazie!

[oregon]

In VB6 c'e' l'oggetto Timer. Non so se ti puo' essere utile.

[Genius7115]

Di base devi utilizzare il Timer, se l'intervallo è minore di 2 min ok, altrimenti utilizza il timer per controllare l'ora di sistema e quando ritieni opportuno effettua la scansione

[WGH]

Mi potete postare un "frammento" di codice, tanto per farmi un'idea?
Grazie!

[xegallo]

Private Sub Timer1_Timer()
On Error GoTo OUT
Static i As Integer

    i = i + 1
    If i >= 5 Then 
        i = 1
        Call AggiornaStatusbar
        'Debug.Print Now
    End If
    
Exit Sub
OUT:
    Timer1.Interval = 0
End Sub