Empecher la saisie dans une textbox

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 561 fois - Téléchargée 77 fois

Contenu du snippet

C'est à la fois parfois très utile et extremement simple:

Essayez:

Source / Exemple :


' Ajoutez KeyAscii = 0 dans l'évenement KeyPress
' de la Textbox

Private Sub Text1_KeyPress(KeyAscii As Integer)
  KeyAscii = 0
End Sub

Conclusion :


Si si, ca marche !

A voir également

Ajouter un commentaire

Commentaires

esoterik
Messages postés
9
Date d'inscription
vendredi 10 octobre 2003
Statut
Membre
Dernière intervention
11 février 2004
-
merci, ça marche aussi pour les combobox , vraiment bien !!
cs_Syborg
Messages postés
4
Date d'inscription
jeudi 21 août 2003
Statut
Membre
Dernière intervention
19 novembre 2003
-
Ca permet surtout de pouvoir jeter les caractères indésirables ex :

If Not IsNumeric(Chr$(KeyAscii)) And KeyAscii <> 8 Then
KeyAscii = 0
End If
MaxiGiji
Messages postés
8
Date d'inscription
mardi 6 mai 2003
Statut
Membre
Dernière intervention
3 août 2004
-
Il n'aurait pas été plus malin de mettre la propriété "Locked" à True ???
Vb Lover
Messages postés
221
Date d'inscription
vendredi 30 novembre 2001
Statut
Membre
Dernière intervention
13 février 2010
3 -
pour demon5439 : un code tout bête :

If Right(Text1.Text, 1) = "," Then
Text1.Text = Left(Text1.Text, Len(Text1.Text) - 1) & "."
End If
cs_demon5439
Messages postés
10
Date d'inscription
lundi 25 novembre 2002
Statut
Membre
Dernière intervention
21 avril 2003
-
salut, moi je cherche une fonction qui permet de remplacer un caractère qui vien d'etre tapé, par un autre. exemple : je tape "," (virgule) et c'est automatiquement remplacé par un "." (point) alors je fouille dans les archives des sources ... peu etre vais-je trouver... merci de répondre quand meme, ca serai simpa !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.