RECHERCHE DE VOYELLES

Signaler
Messages postés
365
Date d'inscription
vendredi 24 mai 2002
Statut
Membre
Dernière intervention
18 octobre 2004
-
Messages postés
764
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
6 septembre 2010
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/5523-recherche-de-voyelles

Messages postés
764
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
6 septembre 2010
18
Une indentation du code sera appréciée..
Messages postés
60
Date d'inscription
mardi 4 septembre 2001
Statut
Membre
Dernière intervention
19 janvier 2009

Tsss, y a beaucoup + court et rapide :
Une seule boucle suffit :

LchaineTotal=len(chaine)

for j=0 to 5
chaine=replace(chaine,t(j),"")
next

msgbox "le nombre de voyelle est :" & LchaineTotal-len(chaine)
Messages postés
436
Date d'inscription
dimanche 20 janvier 2002
Statut
Membre
Dernière intervention
2 février 2010
2
Il préfère le h... (sourire)
Messages postés
365
Date d'inscription
vendredi 24 mai 2002
Statut
Membre
Dernière intervention
18 octobre 2004

h, hum...
et y, nan ? t'es raciste, tu veux pas de grecs ? lol ;)