A voir également:
- VB.5 ou VB.6
- Vb - Télécharger - Langages
- Nero 6 - Télécharger - Gravure
- Vb audio cable - Télécharger - Audio & Musique
- Gta 6 trailer 2 - Guide
- Paris multiple 2/6 explication ✓ - Forum Loisirs / Divertissements
5 réponses
Bonjour,
On peut faire comme ça :
;o)
On peut faire comme ça :
Private Sub TextBox1_Change()
If Len(Me.TextBox1) > 1 Then
TextBox1 = Mid(TextBox1, 1, 1)
Exit Sub
End If
End Sub
;o)
Hello,
Dans les proprietes de ton objet Textbox tu dois avoir MaxLenght, initialises le a 1. Ca evite du code.
Pour information sur le code ascii, regardes l'evenement KeyPress de ton objet TextBox (par exemple), fais un msgbox de la variable Keyascii et tu verras son code de la touche activee.
Dans les proprietes de ton objet Textbox tu dois avoir MaxLenght, initialises le a 1. Ca evite du code.
Pour information sur le code ascii, regardes l'evenement KeyPress de ton objet TextBox (par exemple), fais un msgbox de la variable Keyascii et tu verras son code de la touche activee.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question