Discussion :

[dodo28]

Bonjour,
Pouvez vous m'aider, lorsque la douchette passe sur le code-barre, le contenu du code barre s'inscrit dans un textbox.
Malheureusement le code barre n'est pas visisble dans le textbox, il est placé completement a droite. J'ai beau changer l'emplacement (gauche droite ou centre) le contenu reste invisible.
Et si je repasse la douchette, il place le contenu a la suite du deja présent mais je desirerai qu'il remplace le précédent.
Merci pour votre aide

[dodo28]

Aprés recherche j'ai trouvé ce code qui empeche la saise de plus de 9 caracteres et le contenu du code barre est visible (pourquoi ? je ne sais pas).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Te_CodeBarre_Change()
 
If Len(Te_CodeBarre.Text) > 9 Then
   Te_CodeBarre.Text = Mid$(Te_CodeBarre.Text, 1, 9)
End If
 
End Sub

Maintenant si je repasse un nouveau code barre ca ne marche plus en faite il faudrai qu'il me selectionne le code precedent pour le remplacer. J'ai essayer avec selstar et sellen mais ca ne marche pas marci pour votre aide

[dodo28]

Je ne sais pas si j'utilise la bonne methode mais ca à l'air de marcher avec ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Te_CodeBarre_Change()
 
If Len(Te_CodeBarre.Text) > 9 Then
   Te_CodeBarre.Text = Mid$(Te_CodeBarre.Text, 1, 9)
End If
 
Te_CodeBarre.SelLength = Len(Te_CodeBarre)
End Sub

Avec ce code le textbox reste selectionner c'est pas trés esthétique.

En esperant que c'est la bonne methode
N'hesitez pas à me proposer d'autres solutions
Merci pour ceux qui ce sont intérréssés à mon probléme