Les Snippets

Connexion

N'autoriser que la Saisie de chiffres dans un champ texte

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 12/04/2006 10:22:04 et initié par bultez [Liste]
Date de mise à jour : 28/08/2006 10:55:17
Vue : 31836
Catégorie(s) : Chaîne de caractères
Langages dispo pour ce code :
- Javascript
- VB6, VBA
- Javascript
- C# 1.x, C# 2.x
- Java
- Windev
- Delphi 5
- Javascript
- Voir tous les langages pour ce code snippet



Langage : VB6 , VBA
Date ajout : 17/04/2006
Posté par WhiteDwarf [Liste]
DateMAJ : 28/08/2006
Private Sub BoiteAChiffres_KeyPress(KeyAscii As Integer)
'Keypress

Dim chaine
chaine = "0123456789 "
If InStr(1, chaine, Chr(KeyAscii)) = 0 And Not KeyAscii = 8 Then

    'KeyAscii = 8 est la touche Del
    'On bloque ce qui n'est pas compris dans la variable chaine sauf la touche Del

    Beep
    KeyAscii = 0
    'On assign un KeyAscii vide à la text box
End If
End Sub
Remarque :
Le controle text en question ici se nomme BoiteAChiffres

Snippets en rapport avec : Textbox, Numérique, Contrôle, Numéricité, Chiffre



Codes sources en rapport avec : Textbox, Numérique, Contrôle, Numéricité, Chiffre

{Visual Basic, VB6, VB.NET, VB 2005} FORMATER UN TEXTBOX (N'ACCEPTER QUE DES CHIFFRES)
Dans VB, le contrôle ListBox ne possède pas de propriété Format (dommage!). Si l'on veut que ce c...

{C# / C#.NET} TEXTBOX SÉQUENCE DE TOUCHES.
Voici un contrôle qui peut etre interessant à utiliser si vous avez besoin d'enregistrer et/ou d'exp...

{Visual Basic, VB6, VB.NET, VB 2005} [VB.NET] NUMERIXBOX - UNE TEXTBOX NUMÉRIQUE QUI GÈRE LES DÉCIMALES ET LES ARRONDIS
c'est un Component à utiliser en lieu et place d'un TextBox pour gérer l'affichage des numériques. ...

{Visual Basic, VB6, VB.NET, VB 2005} CONTROLE DE SAISIE TEXTBOX SOUS VISUAL STUDIO EXPRESS 2005
Ce code permet de controler le contenu de la textbox selon les choix: que numerique(virgule o...

{Visual Basic, VB6, VB.NET, VB 2005} TEXTBOX NUMÉRIQUE
Ce textbox permet la saisie de nombre uniquement. Plusieurs options : - nb de decimal - symbole ...

{C# / C#.NET} TEXTBOX : NUMERIC ET TOUCHE ENTER
Vous avez un textbox, vous voulez saisir uniquement du numérique ou bien utiliser la touche Entrer c...

{C# / C#.NET} TEXTBOX NUMÉRIQUE
Comme cette question revient sans cesse dans le forum, voici comment créer une textbox n'acceptant q...

{Visual Basic, VB6, VB.NET, VB 2005} TEXTBOX NUMERIQUE
Le code suivant permet de limiter la saisie dans un textbox à un ensemble de caractères. En particul...

{Delphi} BAKTPACK (PACK DE COMPOSANTS BACTERIUS)
Bonsoir ! Voici mon pack de composants ! Voici une description de tous ces composants : - Bac...

{Visual Basic, VB6, VB.NET, VB 2005} CONTRÔLE SIMPLE POUR CODE POSTAUX
C'est un contrôle qui hérite de Textbox pour recevoir un code postal. Les codes postaux validés s...