VB.5 ou VB.6

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.
Configuration: Windows XP
Internet Explorer 6.0

5 réponses

  1. 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)
    1. 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)
  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.