Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 20 déc. 2019 à 07:22
GOTO déconseillé
on voit bien là quelqu'un qui n'a aucune conscience de ce qui se passe une fois compilé ^^
des sauts; des sauts et encore...... des sauts
Whismeril
Messages postés19028Date d'inscriptionmardi 11 mars 2003StatutNon membreDernière intervention24 avril 2024656 5 avril 2019 à 07:05
Un truc comme ça
Like « # » or like « #.# »
.
Sinon une regex de ce genre
\d+([\.,]\d+)?
Galactus13
Messages postés335Date d'inscriptionlundi 29 septembre 2008StatutMembreDernière intervention16 août 20231 5 avril 2019 à 02:46
J'ai en effet, placé la coloration syntaxique ^^
Pour la chaine complète, like ne fonctionne pas , je n'ai pas réussi.
Whismeril
Messages postés19028Date d'inscriptionmardi 11 mars 2003StatutNon membreDernière intervention24 avril 2024656 4 avril 2019 à 17:53
Comme précisé dans le premier lien que je t’ai donné, il est decrit comment mettre la coloration sans le bouton.
Et quand je dis de tester avec like, c’est sur la chaine complète.
Galactus13
Messages postés335Date d'inscriptionlundi 29 septembre 2008StatutMembreDernière intervention16 août 20231 Modifié le 4 avril 2019 à 17:15
Bonjour,
Désoler, le descriptif a disparu quand j'ai voulu corriger de défaut d'affichage, toujours pas corrigé puisque je n'ai pas le bouton qui permet le code !
Pour faire simple le goto est là pour passer l'option null ... je n'aime pas les gotos quand on peu s'en passer mais dans ce cas de figure, il n'est pas imbriqué dans une boucle, donc pas de risque de plantage ...
Il s'agit d'un vieux code écrit enVB ... 5 !
Oui, oui ! convertie a la base d'un code que j'avais écrit en Qbasic et bien sur amélioré ! Ensuite, je pouvais aussi utiliser par exemple:
If Not Chr(KeyAscii) Like "[0123456789-]" Then KeyAscii = 0
Mais cette fonction bien que très pratique et fonctionnel à un sérieux défaut:
Il accepte des virgule ou des points a volonté dans le textBox,
donc mon petit code permet de corriger cela avec un code simple et somme toute court.
Whismeril
Messages postés19028Date d'inscriptionmardi 11 mars 2003StatutNon membreDernière intervention24 avril 2024656 4 avril 2019 à 07:04
Bonjour Galatus, ça fait fouillis comme tu dis car tu n’as pas utilisé la coloration syntaxique. Voir ici https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code D’autre part le titre parle de textbox, or ce code est une fonctions isolée.
Tu n’expliques pas comment on l’utilise avec une textbox ni d’ailleurs à quoi elle sert.
vb95
Messages postés3472Date d'inscriptionsamedi 11 janvier 2014StatutContributeurDernière intervention13 avril 2024169 4 avril 2019 à 01:48
Bonsoir Galactus13
Désolé : le code est bien du VB 6
Oublie mon commentaire avec mes excuses
vb95
Messages postés3472Date d'inscriptionsamedi 11 janvier 2014StatutContributeurDernière intervention13 avril 2024169 Modifié le 4 avril 2019 à 00:32
bonjour !
C'est du code VB Net à la sauce VB 6
Tu ne profites nullement des fonctionnalités NET !
Ne mérite point à mon avis de rester sur le site
20 déc. 2019 à 07:22
on voit bien là quelqu'un qui n'a aucune conscience de ce qui se passe une fois compilé ^^
des sauts; des sauts et encore...... des sauts
5 avril 2019 à 07:05
Sinon une regex de ce genre
5 avril 2019 à 02:46
Pour la chaine complète, like ne fonctionne pas , je n'ai pas réussi.
4 avril 2019 à 17:53
Et quand je dis de tester avec like, c’est sur la chaine complète.
Modifié le 4 avril 2019 à 17:15
Désoler, le descriptif a disparu quand j'ai voulu corriger de défaut d'affichage, toujours pas corrigé puisque je n'ai pas le bouton qui permet le code !
Pour faire simple le goto est là pour passer l'option null ... je n'aime pas les gotos quand on peu s'en passer mais dans ce cas de figure, il n'est pas imbriqué dans une boucle, donc pas de risque de plantage ...
Il s'agit d'un vieux code écrit enVB ... 5 !
Oui, oui ! convertie a la base d'un code que j'avais écrit en Qbasic et bien sur amélioré ! Ensuite, je pouvais aussi utiliser par exemple:
Mais cette fonction bien que très pratique et fonctionnel à un sérieux défaut:
Il accepte des virgule ou des points a volonté dans le textBox,
donc mon petit code permet de corriger cela avec un code simple et somme toute court.
4 avril 2019 à 07:04
D’autre part le titre parle de textbox, or ce code est une fonctions isolée.
Tu n’expliques pas comment on l’utilise avec une textbox ni d’ailleurs à quoi elle sert.
Du point de vue du code, tu utlises un goto, c’est très déconseillé https://www.developpez.net/forums/d4388/general-developpement/langages-programmation/debuter/pourquoi-goto-deconseille/
En plus, si le but est de vérifier que le texte représente un nombre, tu aurais gagné du temps (d'exécution et de codage) comparant directement la chaine avec Like ou une regex.
4 avril 2019 à 01:48
Désolé : le code est bien du VB 6
Oublie mon commentaire avec mes excuses
Modifié le 4 avril 2019 à 00:32
C'est du code VB Net à la sauce VB 6
Tu ne profites nullement des fonctionnalités NET !
Ne mérite point à mon avis de rester sur le site
Pour coder en VB Net un excellent site : https://plasserre.developpez.com/cours/vb-net/
4 avril 2019 à 00:29