Validation minuscule/majuscule dans un textbox
Résolu
cs_pure
Messages postés
6
Date d'inscription
lundi 20 septembre 2004
Statut
Membre
Dernière intervention
23 septembre 2005
-
20 sept. 2004 à 20:54
cs_pure Messages postés 6 Date d'inscription lundi 20 septembre 2004 Statut Membre Dernière intervention 23 septembre 2005 - 20 sept. 2004 à 22:16
cs_pure Messages postés 6 Date d'inscription lundi 20 septembre 2004 Statut Membre Dernière intervention 23 septembre 2005 - 20 sept. 2004 à 22:16
2 réponses
cs_Jack
Messages postés
14006
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
79
20 sept. 2004 à 21:25
20 sept. 2004 à 21:25
Salut pure
Ta question n'est pas assez précise.
Tu veux que l'on ne puisse saisir que des min ou que des maj ?
Dans ton Text1_KeyPress, tu mets simplement :
KeyAscii = Asc(UCase(Chr(KeyAscii))) ' pour avoir tout en Maj
KeyAscii = Asc(LCase(Chr(KeyAscii))) ' pour avoir tout en Min
- KeyAscii représente le code ascii du caractère qui vient d'être saisi.
- ASC transforme un caractère en son code ascii
- CHR transforme un code ascii en son caractère
- LCase transforme un caractère en minuscule
- UCase ... devine ...
Si tu veux savoir si un caractère est min ou maj :
If UCase(MonCar) = MonCar Then MsgBox "Maj"
If LCase(MonCar) = MonCar Then MsgBox "Min"
Vala
Jack
Ta question n'est pas assez précise.
Tu veux que l'on ne puisse saisir que des min ou que des maj ?
Dans ton Text1_KeyPress, tu mets simplement :
KeyAscii = Asc(UCase(Chr(KeyAscii))) ' pour avoir tout en Maj
KeyAscii = Asc(LCase(Chr(KeyAscii))) ' pour avoir tout en Min
- KeyAscii représente le code ascii du caractère qui vient d'être saisi.
- ASC transforme un caractère en son code ascii
- CHR transforme un code ascii en son caractère
- LCase transforme un caractère en minuscule
- UCase ... devine ...
Si tu veux savoir si un caractère est min ou maj :
If UCase(MonCar) = MonCar Then MsgBox "Maj"
If LCase(MonCar) = MonCar Then MsgBox "Min"
Vala
Jack
cs_pure
Messages postés
6
Date d'inscription
lundi 20 septembre 2004
Statut
Membre
Dernière intervention
23 septembre 2005
20 sept. 2004 à 22:16
20 sept. 2004 à 22:16
Salut!
Merci pour ta réponse! En effet, je cherche à savoir si un caractère est une minuscule ou une majuscule. À vrai dire, je dois vérifier si chacun des caractères entrés par l'utilisateur dans un textbox est une majuscule ou une minuscule. Est-ce qu,une boucle utilisant :
If UCase(MonCar) = MonCar Then MsgBox "Maj"
If LCase(MonCar) = MonCar Then MsgBox "Min"
serait le moyen le plus simple de faire cet action ?
Merci pour ta réponse! En effet, je cherche à savoir si un caractère est une minuscule ou une majuscule. À vrai dire, je dois vérifier si chacun des caractères entrés par l'utilisateur dans un textbox est une majuscule ou une minuscule. Est-ce qu,une boucle utilisant :
If UCase(MonCar) = MonCar Then MsgBox "Maj"
If LCase(MonCar) = MonCar Then MsgBox "Min"
serait le moyen le plus simple de faire cet action ?
