Limiter saisie à ListeRésolu

Question

Bonjour &#224; tous,
Comment peut-on limiter la saisie d'un zone de texte &#224; une liste d&#233;clar&#233;e pr&#233;alablement.
Merci de vos r&#233;ponses ;)

cs_vpoyo · Accepted Answer

il faut interc&#233;pter l'&#233;v&#232;nement KeyPress

exmp emp&#234;che la saisie de a, b ou c

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If     If (InStr(1, "abc", Chr(KeyAscii)) <> 0) Then
        KeyAscii = 0
    End If
End Sub

Renfield · Answer

utilises un Combo, c'est plus approprié
(avec un Style = DropDown List)

myghost · Answer

D&#233;soler, je me suis mal exprim&#233;.
Je ne parles pas de zone de liste ou modifiable ou pas, mais de liste de caract&#232;res autoris&#233;es

Renfield · Answer

If (InStrB("abc", Chr$(KeyAscii)) = 0) And KeyAscii <> 8 And KeyAscii <> 3 And KeyAscii <> 24 And KeyAscii <> 22 Then KeyAscii = 0 End If 8 => touche BackSpace, sinon, on ne peut pas supprimer de caractère 3 / 24 / 22 => Presse papier. à noter que le presse papier n'est pas ici vérifié, et pourrais contenir des caractères 'interdits' à noter également que a, b et c sont autorisés, mais pas A, B ou C pour ce faire, InStrB("abc", Chr$(KeyAscii),Compare:=vbTextCompare) ou InStrB("abcABC", Chr$(KeyAscii)) Amusez-vous ! Renfield - thomas_reynald@msn.com Admin CodeS-SourceS - MVP Visual Basic

savoir06 · Answer

bonjour tt le monde j'ai presque le meme probl&#232;me mais avec "inputbox" je veux limit&#233; la saisie ds cette derni&#232;re en ( valeur num&#233;rique et non pas les carac) c'est en vb merci d'avance

cs_vpoyo · Answer

heu je ne pense pas que tu puisses avoir ce controle sur le textbox de l'inputbox.

mais tu peux toujours tester le retour de ce dernier et r&#233;inviter l'utilisateur a une resaisie si besoin est.



Narf

savoir06 · Answer

salut je pense que c'est claire j'ai bien essai&#233; avec l'inputbox y a pas de r&#233;sultat merci Narf

Limiter saisie à Liste

7 réponses

Discussions similaires