Dans un textbox ou un controle qui possede la propriété KeyPress
Ce code empêche de saisir d'autres caractères que ceux mis entre guillemets ("1234567890")
ATTENTION : Le Chr(8) permet de faire BACKSPACE ou EFFACE
Si vous affectez une valeur à Texte via le code et qu'elle contient des autres caractères que ceux entre guillemets,
ils ne s'afficherons pas.
ATTENTION : VOUS DEVEZ DEFINIR LES AUTRES TOUCHES SI VOUS LES VOULEZ
>>>Voir ma source 534 : TOUTES LES VALEURS ASCII DU CLAVIER (...)
TRAITEMENT DIRECT SUR LA CHAINE DE CARACTERES
Source / Exemple :
Private sub Texte_KeyPress()
If InStr("1234567890" & Chr(8), Chr$(KeyAscii)) = 0 Then
KeyAscii = 0
End If
Conclusion :
Voila
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.