saisies dans plusieurs zones Text

Question

Bonjour

Pourriez-vous m'aider  résoudre mon problème:

J'ai plusieurs zones Text:
Text1.Text - Text2.text -etc

J'aimerai que mon curseur de saisie se mette automatiquement dans la zone Text suivante dés que j'ai saisie 2 caractères dans la Zone précédente.


Exemple: si je tape: 01 dans la première zone Text (Text1.Text), j'aimerai que mon curseur de saisie passe automatiquement dans la 2ème zone Text (Text2.Text) sans que j'ai besoin de cliquer dans cette zone pour effectuer ma saisie manelle.


Aussi: Comment à l'ouverture de ma Form placer mon curseur en auto dans la première zone de saisie Text1.text ?

Me suis-je bien fait comprendre ? pas facile :) :)

Merci de votre aide à tous

A bientôt

Bye

cs_thephil · Answer

cela devrait fonctionner :

Private Sub Text1_Change()

If Len(Text1) > 1 Then  (ou =2) ... suivant ce qu'il y'a dedans au début.
    Text2.SetFocus
End If

End Sub

faire de même pour les autres zones de textes

pour le focus, à l'ouverture du form, tu mets la propriété tabindex de ta zone de texte à 0.

voilà, en espérant que ça t'aide.

jrivet · Answer

Sinon Tu peux essayer de faire un Groupe de controle Et ensuite il te reste juste a faire: Private Sub Text1_Change(Index As Integer) If Len(Text1(Index).Text) = 2 Then If (Index + 1) <= Text1.UBound Then Call Text1(Index + 1).SetFocus Else Call Text1(0).SetFocus End If End If End Sub Coloration syntaxique automatique [AFCK] @+, Julien Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>

cs_thephil · Answer

Allez, on tient le bon bout ....

cs_thephil · Answer

Julien, juste pour infos, comment fait on la coloration syntaxique dans les messages ?
car c'est vrai que c'ets beaucoup plus clair comme ça !

jrivet · Answer

> thephil: C'est une appli externe que m'a offert une autre membre de CS 

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>

cs_thephil · Answer

ha ok, je pensais que c'était une option du forum, merci !

chaibat05 · Answer

Salut à tous et à toutes.


Si je puis me permettre de suggerer à Didier72 ma façon de travailler en réponse à sa question.


1° Pour que mon curseur se place à la 1iére zone de text au chargement de la form, j'attribut à la propriété TabIndex de mon contrôl la valeur 0.
Et selon l' ordre que je veux, j' attribus (toujours à la même propriéte) aux contrôles suivants des valeurs successives (1,2,3,...etc).
2° Pour que mon curseur passe d' une zone de saisie à l' autre je place dans la procedure KeyUp (et (non dans Change) la ligne suivante:
If keyCode=vbKeyReturn then SendKeys "{tab}".
Ainsi je ne suis pas limité par le nombre de caractères que je dois saisir,et que je ne passe à la zone suivante que si je valide par enter.
Voilà.J'espère que j' étatis clair.
A+

cs_Didier72 · Answer

Hello

Merci à tous

ça marche et c'est super

Bye

jrivet · Answer

Salut,

De rien.

En revanche appuie sur le bouton Réponse Acceptée sur le(s) post(s) qui a(ont) pu t'aider.

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>

Saisies dans plusieurs zones Text

9 réponses

Votre réponse

Discussions similaires