ranouf
Messages postés237Date d'inscriptionmercredi 18 décembre 2002StatutMembreDernière intervention31 août 2009
-
19 sept. 2003 à 18:04
cs_rene38
Messages postés1858Date d'inscriptionsamedi 29 juin 2002StatutMembreDernière intervention17 octobre 2013
-
19 sept. 2003 à 18:57
je voudrai pouvoir autoriser l'utilisation de la touche effacer dans ce code qui autorise seulement la saisie de chiffre dans ma textbox :
if ((keyAscii < asc("0") or KeyAsci > Asc("9") )then
keyAscii = 0
end if
g bien trouver vbkeydelete mais ça change rien
..
merci
cs_rene38
Messages postés1858Date d'inscriptionsamedi 29 juin 2002StatutMembreDernière intervention17 octobre 201311 19 sept. 2003 à 18:57
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 8, 48 To 57, 44, 46 ' 8 effact arrière ; 48 à 57 chiffes ' 44 virgule ; 46 point
' tu supprimes ce que tu veux
Case Else
KeyAscii = 0
End Select
End Sub