VB vérification du N° de téléphone
Fermé
mike_22
-
27 févr. 2007 à 11:12
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 3 déc. 2008 à 11:47
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 3 déc. 2008 à 11:47
A voir également:
- VB vérification du N° de téléphone
- Règle en cm sur téléphone - Guide
- Schéma téléphone oublié - Guide
- Vérification lien - Guide
- Vb cable - Télécharger - Audio & Musique
- Comment trouver le mot de passe wifi sur son téléphone - Guide
2 réponses
Bonjour,
tu fais :
-----
Private Sub text1_Validate(Cancel As Boolean)
text1 = Format$(text1.Text, "@@@/@@@.@@.@@")
End Sub
-----
le "@" correspond à tes chiffres.
Grâce à "Format$" tu peux formater tes champs comme tu veux.
Autre exemple : format téléphone : "01 41 42 43 44"
=> text1 = Format$(text1.Text, "@@ @@ @@ @@")
Hova
tu fais :
-----
Private Sub text1_Validate(Cancel As Boolean)
text1 = Format$(text1.Text, "@@@/@@@.@@.@@")
End Sub
-----
le "@" correspond à tes chiffres.
Grâce à "Format$" tu peux formater tes champs comme tu veux.
Autre exemple : format téléphone : "01 41 42 43 44"
=> text1 = Format$(text1.Text, "@@ @@ @@ @@")
Hova
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 302
3 déc. 2008 à 11:47
3 déc. 2008 à 11:47
Bonjour Mike, LabK
S'il s'agit de vérifier si la saisie correspond bien au modèle:
If lasaisie Like "###[/]###[.]##[.]##" Then
msgbox "saisievalable"
end if
S'il s'agit de vérifier si la saisie correspond bien au modèle:
If lasaisie Like "###[/]###[.]##[.]##" Then
msgbox "saisievalable"
end if