Detecter les tabulations(dans des textbox par exemple)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 234 fois - Téléchargée 44 fois

Contenu du snippet

Par defaut quand vous appuyez sur la touche tabulation ca selectionne les controle 1 par 1 et vous ne pouvez associer aucun code, la solution est de desactiver pour tout les controle le TabStop (donc tabstop = false)

A partir de la vous pouvez lancer un code mais le probleme c'est que ca selectionne plus les autres controles et en plus sa fait un son "Ding"

Je vous conseil alors de creer des index (selectionner le textbox) faites copier puis coller, on vous demandera alors si vous voulez faire un index cliquez alors sur oui.

La propriété Index determinera de quel controle il s'agit etde l'ordre des tabulation que l'on va effectuer

Source / Exemple :


Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer) ' keyascii contient le numero de la touche, ici 9 correspond a la touche tabulation

'Inserrer ici ce que vous voulez effectuer comme travaux par exemple si l'on appuie sur enter(keyascii = 13) que par exemple ca affiche un message

' a partir d'ici on va s'occuper des selections et de desactiver le sons "Ding"
If KeyAscii = 9 Then 'si on appuie sur tab alors ...
If Index = Text1.Count - 1 Then 'si c'est le dernier controle alors ... (on retire 1 car index part de 0)
Text1(0).SetFocus 'on selectionne le premier controle (l'index du premier controle c'est 0 )
Else 'si c'est pas le dernier controle (literalement sinon)
'il faut passer au champ suivant :
Text1(Index+1).SetFocus
End If 'fin de la condition du test du numero de control
KeyAscii = 0 ' cette ligne sert à desactiver le son "Ding", ne rien mettre en dessous de cette ligne vu qu'en dessous on ne sait pas quel touche l'utilisateur a appuyé
End If 'fin de la condition du test de la touche appuyé
End Sub 'fin de la procedure

Conclusion :


/!\ Important, ca marchera pas tant que tout les controle n'auront pas la propriété TabStop à False /!\

A voir également

Ajouter un commentaire

Commentaire

Messages postés
117
Date d'inscription
lundi 23 octobre 2000
Statut
Membre
Dernière intervention
12 août 2009

c'est déjà bcp plus intéressant que ton autre source.
merci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.