Timer
Fermé
raajaa
Messages postés
21
Date d'inscription
mercredi 3 février 2010
Statut
Membre
Dernière intervention
2 mai 2010
-
2 mai 2010 à 23:56
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 3 mai 2010 à 00:39
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 3 mai 2010 à 00:39
A voir également:
- Timer
- Shutdown timer - Télécharger - Personnalisation
- Multi timer - Télécharger - Bureautique
- Task timer - Télécharger - Gestion de projets
- Vlc timer - Forum Montage et acquisition vidéo
- Sleep timer tv tcl - Forum Téléviseurs
1 réponse
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
Modifié par lermite222 le 3/05/2010 à 00:40
Modifié par lermite222 le 3/05/2010 à 00:40
Bonjour,
Comme tu parle d'un timer je suppose que tu est en Visual Basic ?
Le timer doit être avec les propriétés :
Enabled = False
Interval = 1000
Le code de la feuille...
A+
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
Comme tu parle d'un timer je suppose que tu est en Visual Basic ?
Le timer doit être avec les propriétés :
Enabled = False
Interval = 1000
Le code de la feuille...
Option Explicit
Dim Delais As Integer
Dim S As Integer
Private Sub Form_Load()
S = -1
Delais = 10 'Pour 10 seconde
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Dim L
L = Second(Now)
If S < 0 Then
S = L + Delais
Else
If L + Delais >= S Then Unload Me
End If
End Sub
A+
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
