Comptage du nombre de lettres dans un label

siciliano99 Messages postés 22 Date d'inscription mercredi 2 janvier 2008 Statut Membre Dernière intervention 2 janvier 2010 - 22 avril 2009 à 12:06
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 - 22 avril 2009 à 21:49
bonjour a tous j'aie un petit soucis car j'arrive a compté le nombre de mot et de lettre dans un label mais je n'arrive pas
a ne as compté dans mon calcul les caractères spéciaux (, ; . * ). Donc pour dire simple seulement compté les lettres sans les points et virgules

NbrMot = (UBound(Split(lblPhrase.Caption, " ", , vbTextCompare)) + 1)
   
    NbrLettre = Len(lblPhrase.Caption)
    NbrLettre = (NbrLettre - (NbrMot - 1))

merci d'avance bonne journée

1 réponse

jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
22 avril 2009 à 21:49
Bonjour,

copie donc ta chaine dans une variable - remplace les "," , les "."  et le s";" par rien (fonction Replace) et fais ton Len sur le résultat !
0
Rejoignez-nous