Oppure

Loading
06/06/07 16:30
XnitroXTX
ciao ragazzi!!!
come faccio a mettere il tempo al mio programma???
mi spiego meglio:
per esempio quando apro il programma inizia il tempo(1-2-3-4 ecc.)
come fare???
aaa
06/06/07 17:44
umberto
Inserisci in un form l'oggetto TIMER
IMPOSTA la proprietà INTERVAL=1000

inserisci questo:


Private Sub Timer1_Timer()

Static Secondi As Long
Secondi = Secondi + 1
If Secondi = 120 Then
'qui inserisci il codice da eseguire per TEMPO ESAURITO
End If
End Sub


*** in questo esempio è considerato un tempo pari a 120 secondi ==== 2 minuti

Ciao
aaa
30/06/07 9:41
gius
XnitroXTX non cambiare l'enabled del timer altrimenti non parte:rotfl::rotfl:
aaa
30/06/07 14:30
P4p3r0g4
Postato originariamente da umberto:

Inserisci in un form l'oggetto TIMER
IMPOSTA la proprietà INTERVAL=1000

inserisci questo:


Private Sub Timer1_Timer()

Static Secondi As Long
Secondi = Secondi + 1
If Secondi = 120 Then
'qui inserisci il codice da eseguire per TEMPO ESAURITO
End If
End Sub


*** in questo esempio è considerato un tempo pari a 120 secondi ==== 2 minuti

Ciao

più che altro questo è un countdown è sufficente
Private Sub Timer1_Timer()
Secondi = Secondi + 1
sectxt.text = secondi
End Sub
aaa