Pour yannch (combobox numérique)
Description
Exemple pour ne validé que des valeurs numérique sur un ComboBox (pour yannch)
Source / Exemple :
Private Sub cmbExemple_KeyPress(KeyAscii As Integer)
' Déclaration des variables
Dim lngI As Long
'
If KeyAscii = 13 Then
For lngI = 1 To Len(cmbExemple.Text)
If InStr(" 0123456789", Mid(cmbExemple.Text, lngI, 1)) = 0 Then
MsgBox "Non ce n'est pas des chiffres..."
cmbExemple.Text = ""
Exit Sub
End If
Next lngI
cmbExemple.AddItem cmbExemple.Text
cmbExemple.Text = ""
MsgBox "Ok les chiffres sont ajouté..."
End If
End Sub
Codes Sources
A voir également
- Pour yannch (combobox numérique)
- Ora-01858: caractère non numérique trouvé à la place d'un caractère numérique - Forum VB.NET
- Combobox en java ✓ - Forum Java
- Combobox html ✓ - Forum PHP
- Combobox delphi ✓ - Forum Delphi / Pascal
- Mise à jour d'un champ numérique. - Forum C# / .NET
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.