Validation de saisie pour textbox

Contenu du snippet

Admettons que vous ne devez accepter dans un contrôle TEXTBOX
uniquement des chiffres et le séparateur décimal, cette instruction
toute simple, n 'acceptera que les valeurs indiquées dans l'instruction LIKE
(instruction SQL ).

Source / Exemple :


Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not Chr(KeyAscii) Like "[0123456789.]" Then KeyAscii = 0
End Sub

Conclusion :


Comme vous avez pu le remarquer le code se place dans l'événement KeyPress du contrôle TEXTBOX...

A voir également

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.