TextBox en VB6

Résolu

MICHELBLANVALET Messages postés 12 Date d'inscription lundi 8 mars 2004 Statut Membre Dernière intervention 25 février 2006 - 10 févr. 2006 à 07:04
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 - 10 févr. 2006 à 07:40

Débutant en VB6 ,
Je cherche le moyen de savoir si l'on peut limiter une valeur numériquedans une TextBox
Ex: Ne pas pouvoir entrée une valeur supérieure à 80
Merci d'avance

A voir également:

Textbox vb6
Textbox ✓ - Forum VB.NET
Vb6 wait ✓ - Forum Visual Basic 6
Textbox c# ✓ - Forum C# / .NET
Vb6 windows 10 ✓ - Forum Visual Basic 6
Forcer une textBox a n'accepter que des chiffres ✓ - Forum C# / .NET

1 réponse

Réponse 1 / 1

cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
10 févr. 2006 à 07:40

Salut,

Il faut tester le nombre entré :

Private Sub Text1_KeyPress()

Dim sNombre as string
sNombre = Text1.Text & Asc(KeyAscii)
If Not IsNumeric(sNombre) Then
KeyAscii = 0
exit sub
end if
If Val(sNombre) > 80 Then
KeyAscii = 0
exit sub
end if

End Sub

_
Avant de poster dans le forum,
Prière d'aller lire ceci :
http://www.codes-sources.com/reglement.aspx

Discussions similaires

Comment ecrire dans un TextBox...

[VBA] Créer une TextBox dans Excel et copier des cellules dedans

utilisation de l'API sleep en vb6

VB6 Fonction Instr et Right/Left

Créer une textbox dynamique