Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 10 02:27:04

ET C'EST PARTI POUR SILVERLIGHT 3 ! par broux

[REFACTORING] TéLéCHARGEZ RESHARPER V5 PREVIEW POUR VISUAL STUDIO 2010 par tja

DéSACTIVER L'AUTOCOMPLéTION DANS OPENOFFICE CALC par MadMatt

ON A éTé TECHCRUNCHé ! par Nix

GOOGLE OS par Bidou

RE : PROBLEME VB6 par xanasx

PROBLEME VB6 par xanasx

SALUT par hachem100

RE : ECHEC SUPPRESSION LIGNE SOUS CONDITION DE LA PREMIERE CELLULE par pile_poil

+ de logiciels à télécharger

1 467 608 membres
28 nouveaux aujourd'hui
15 053 membres club

Trouver une ressource

Trouvez une ressource parmi 40 107 codes, 1 304 668 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

LIMITER LA FRAPPE DANS DES ZONES COMBO OU TEXT À DES CHIFFRES

Information sur la source

Catégorie :VB.NET

Classé sous : caractères, interdits, textbox, combobox, chiffres Niveau : Débutant Date de création : 04/06/2006 Vu : 6 568

Auteur : LaPatoshe

Ecrire un message privé

Note :

10,00 / 10

Commentaire sur cette source (0)

Ajouter un commentaire et/ou une note

Description

Il s'agit d'une petite mise à jour pour VB.NET des astuces déjà existantes pour VB5 et VB6 qui avaient été postées par d'autres membres. Il s'agit d'un petit morceau de code à placer dans l'évènement KeyPress d'une zone de Texte ou d'un Combo pour limiter la frappe de l'utilisateur à des touches de commande (DEL, SUPPR...) et à des chiffres.

Source

Private Sub Combo1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboUMatricule.KeyPress
If Asc(e.KeyChar) < 32 Then
'ASCII < 32 = Tout ce qui est commandes
e.Handled = False
ElseIf (Asc(e.KeyChar) > 47 And Asc(e.KeyChar) < 57) Then
'ASCII compris entre 48 et 57 inclu représente les chiffres de 0 à 9.
e.Handled = False
Else
e.Handled = True
End If
End Sub

Private Sub Combo1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboUMatricule.KeyPress
        If Asc(e.KeyChar) < 32 Then
            'ASCII < 32 = Tout ce qui est commandes 
            e.Handled = False
        ElseIf (Asc(e.KeyChar) > 47 And Asc(e.KeyChar) < 57) Then
            'ASCII compris entre 48 et 57 inclu représente les chiffres de 0 à 9.
            e.Handled = False
        Else
            e.Handled = True
        End If
End Sub

Sources du même auteur

PROGRAMME DE TRANSFORMATION DE TEXTURES

PROGRAMMATION DIRECTX8 TUTORIAL 5 : CHARGEMENT, AFFICHAGE, A...

DIRECTX8 PROGRAMME D'ETUDE DES ECLAIRAGES

PROGRAMMATION DIRECTX8 TUTORIAL 4 : GEOMETRIE 3D ECLAIRAGES

PROGRAMMATION DIRECTX 8 TUTORIAL 3 VERSION C : USAGE DE MATR...

Toutes les sources de LaPatoshe

Sources de la même categorie

UN EDITEUR APPELER MYPAD par DanMor498

EDITEUR DE FICHIERS ENCRYPTER ET ACCÈS PROTÉGÉ par DanMor498

VISUAL BACKUP, SOLUTION DE SAUVEGARDES AUTOMATISÉES par fifrelin70

CALCUL DES JOURS OUVRÉS ET OUVRABLES par jcbouli

ENVOYER DES EMAILS VB 2008 par spqrliv

Toutes les sources de la catégorie VB.NET

Sources en rapport avec celle ci

LABEL ET IMAGE DANS TEXTBOX par gillardg

CALCUL DES HONORAIRES CAC par gbegerco

SCOMBOBOX 1.0.5 par HCammus

COMBOBOX CHARGER DEPUIS BDD VERS TEXTBOX par benahmedsoufiane

4 CONTRÔLES PRATIQUES par Mononcle0

Commentaires et avis

Aucun commentaire pour le moment.

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

max caractères [ par 1217meyrin ] Bonjour,j'ai trois textbox, dans les 2 premières, je rentre des chiffres et lorsque j'appuie sur un bouton ok, la moyenne des 2 chiffre s'inscrit dans comment obliger à mettre 4 caractères en textbox [ par mythiac ] bonjour,j'aurais beoins d'aide pour obliger mon utilisateur à remplir dans une textbox 4 chiffres:voici pour l'instant ce qui me permet de mettre obli Imposer un nombre [ par Belag55 ] Bonjour,Dans un formulaire (sous VBA - Excel), je souhaite imposer à l'utilisateur d'entrer dans un textbox un N° à 8 chiffres dont les 2 permiers son Problème ComboBox [ par jacques13 ] Bonjour,J'ai un petit problème d'affichage avec une ComboBox.Soit une Combo avec une possibilité d'affichage d'environ 10 caractères.Je la remplit ave fixer la position de caractères dans une textbox aide [ par steph064 ] Bonjour, je suis en bts informatique et j'adore la programmation.Je travail sur Excel 2003 avec VB6 et j'aimerais faire ceci:j'ai une textBox appelée" Probleme affichage de textbox [ par jeyjey1 ] Bonjour,Sur un userform J'ai une combobox multicolonne maitre dont les differentes colonnes sont reportées dans d'autre combobox puis la valeur de mes Selection d'un nombre dans un textbox [ par pericles0 ] Bonsoir à tous !Je cherche à extraire nombre dans un textbox, qui contient des lettres, des nombres, ou les deux acollés (ex: Q403). Comment faire pou verif combo et fichier texte [ par spv54 ] Bonjour à tousVoila ma question:J'ai un fichier texte qui se nome site.txtJ'ai une form, sur cette form j'ai une combobox , une textbox et un bouton v Lier une textbox et un combobox [ par Saigneurapophis ] Bonjour,Voilà, j'ai une combobox (DBCombo) reliée à une table contenant la liste des codes postaux de la France. Et je souhaiterai que lorsque j'ai sé Excell: depuis un Usf, selection d'un nom dans un combobox lié à une BD et remplissage de textbox avec les donées relative au nom. [ par kikivba ] Bonjour,Je souhaiterai bénéficier de vos compétences afin de m'aider à élaborer des interfaces de type Userform afin de me permettre de gérer plus sim