title image


Smiley Re: Timer > 60 Sekunden


Private Sub Timer1_Timer()

Static cnt As Integer

If cnt < 4 Then ' Weil cnt beim Erstenmal 0 ist

cnt = cnt + 1

Exit Sub

End If

' TuSonstWas

End Sub


Gruss Uwe
Wenn weise Maenner nicht irrten, müssten die Narren verzweifeln. (Goethe)



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: