Bonjour,

Je développe une pointeuse qui enregistre les heures d'arrivée et de départ.
Chaque agent a une carte avec son code barre, lue dans un textbox avec une douchette.
Afin d'éviter la frappe sur le clavier du code (nécessité donc d'avoir sa carte pour éviter les fraudes), je voudrais remettre à Null le textbox d'entrée si la saisie du code n'est pas réalisée dans un court délai, de l'ordre de 2 secondes. En effet, la lecture avec la douchette est rapide, beaucoup plus qu'une saisie sur le clavier.
Je ne sais pas trop comment m'y prendre.

Voilà le code de saisie du textbox en question :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(Me.TextBox1.Value) = 9 Then
    CodeBarre = Me.TextBox1.Value
    Run "pointer"
    CodeBarre = ""
    Me.TextBox1.Value = Null
    Cancel = True
End If
End Sub
Merci pour votre aide.