VB.5 ou VB.6

hanagi Messages postés 135 Date d'inscription   Statut Membre Dernière intervention   -  
 hanagi -
salaaam

j'ai une zone de texte et je veux la programmer d 1 façon qui empêche d'y écrire plus qu'un seul

caractère ,c.à.d si on y écrit un caractère il est impossible d'y ajouté un autre.
A voir également:

5 réponses

hanagi Messages postés 135 Date d'inscription   Statut Membre Dernière intervention   3
 
alors kel est le code ??
0
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

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)
0
hanagi Messages postés 135 Date d'inscription   Statut Membre Dernière intervention   3
 
merci bcp , ça a b1 fonctionné :) et kel code nous permettra d afficher le code ascii d un caractère quelconque ( click sur un bouton com événement)
0
Ankhsuamon Messages postés 47 Date d'inscription   Statut Membre Dernière intervention   2
 
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.
0
williom Messages postés 230 Date d'inscription   Statut Membre Dernière intervention   51
 
bonjour,

CodeAscii = Asc(TextBox1.Text)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
hanagi
 
merci merci a vs touuus.

A+
0