Textbox Alphabetique

eminemz Messages postés 19 Date d'inscription dimanche 29 juin 2003 Statut Membre Dernière intervention 22 décembre 2004 - 23 mai 2004 à 21:34
eminemz Messages postés 19 Date d'inscription dimanche 29 juin 2003 Statut Membre Dernière intervention 22 décembre 2004 - 24 mai 2004 à 17:31
Bonsoir,
Je voudrai savoir comment faire une textbox qui accepte uniquement les caracteres alphabetiques.

Merci pour vos reponses :)

3 réponses

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
24 mai 2004 à 00:47
Une possibilité parmi d'autres :

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim Autorisés As String
Autorisés = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzéèêàâîôûïëüöç"If InStr(Autorisés, Chr$(KeyAscii)) 0 Then KeyAscii 0
End Sub
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
24 mai 2004 à 03:01
Attention, il te faudra également autoriser certains caractères (de mémoire, les codes 8 -> Retour arriere ; 22,23 et 24 -> Presse papier).
0
eminemz Messages postés 19 Date d'inscription dimanche 29 juin 2003 Statut Membre Dernière intervention 22 décembre 2004
24 mai 2004 à 17:31
C'est genial les gars merci beaucoup a vous !

:big)
0
Rejoignez-nous