aftag
Messages postés18Date d'inscriptionlundi 13 janvier 2003StatutMembreDernière intervention28 mars 2003
-
28 mars 2003 à 10:02
aftag
Messages postés18Date d'inscriptionlundi 13 janvier 2003StatutMembreDernière intervention28 mars 2003
-
28 mars 2003 à 11:02
salut
je voudrais calculer le nombre de voyelle dans une chaine de caractere (je fais de l'orienté objet, c'est une fonction (public function nbvoy() ))
merci de votre reponse
a+
cs_moustachu
Messages postés1079Date d'inscriptionjeudi 14 novembre 2002StatutMembreDernière intervention 1 janvier 2012 28 mars 2003 à 10:40
Je sais pas moi.. une truc du genre :
Public Function nbVoy(MA_CHAINE As String) As Long
Dim compteur As Long
compteur = 0
For i% = 1 To Len(MA_CHAINE)
If InStr("aeiou", Mid(MA_CHAINE, i, 1)) <> 0 Then
compteur = compteur + 1
End If
Next i%
nbVoy = compteur
End Function