GBadry
Messages postés77Date d'inscriptionjeudi 26 avril 2007StatutMembreDernière intervention27 février 2014
-
3 mars 2008 à 15:41
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 2014
-
3 mars 2008 à 18:31
Salut les amis,
j'ai une zone de texte en VB6. je veux que l'utilisateur lis seulement son contenu. je détecte les codes des touches dans l'évenement keydown et je met le keycode à 0.
par exemple pour eviter la suppression à l'aide de la touche Suppr je fais: If keycode 46 then keycode 0
mais le probleme c que la touche backspace je n'ai pas pu l'annuler en faisant if keycode 8 then keycode 0
est ce que quelqu'un connait la solution de ce petit probleme?
GBadry
Messages postés77Date d'inscriptionjeudi 26 avril 2007StatutMembreDernière intervention27 février 20142 3 mars 2008 à 17:58
Merci a vous,
C bon, j'ai trouvé la solution, en fait c cdans l'évenement keypress; je teste si égal à 8 je le met égal à 0If KeyAscii 8 then KeyAscii 0
Vous n’avez pas trouvé la réponse que vous recherchez ?
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 3 mars 2008 à 17:58
Bonjour, LBRE_MAX ,
Et moi (avec ta méthode), j'arrive en me léchant les babines diaboliquement et ... fais dans la textbox un joli coller de ce que j'ai copié n'importe ou ailleurs....
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 3 mars 2008 à 18:31
La solution "orthodoxe" est celle qu'a donné NHenry.
Si l'on veut de surcroit vraiment tout empêcher (y compris la modification par code ... mais ... dans quelles circonstances ? ... je me demande bien ...), ce serait l'évènement Change qu'il faudrait utiliser !
Genre
Dim hehe As String
Private Sub Form_Load()
hehe = Text1.Text
End Sub
Private Sub Text1_Change()
Text1.Text = hehe
End Sub
Mais (une autre fois) : prendre la solution bien plus r(aisonnable de NHenry