Calcul du nombre d'occurence d'un caractère ou chaîne de caractères

0/5 (5 avis)

Snippet vu 13 337 fois - Téléchargée 49 fois

Contenu du snippet

Cette fonction permet de calculer le nombre de fois qu'un caractère ou qu'une chaîne de caractères est présent dans un autre chaîne.

Source / Exemple :


Function CalculateOccurenceNumber(strString As String, strCharacter As String) As Integer
    
    Dim intPosition As Integer
    
    intPosition = 1
    
    While intPosition <= Len(strString) And strCharacter <> "" And InStr(intPosition, strString, strCharacter) <> 0
       
        intPosition = InStr(intPosition, strString, strCharacter)+1
        CalculateOccurenceNumber = CalculateOccurenceNumber + 1
    Wend
End Function

Conclusion :


exemple:

CalculateOccurenceNumber("Ceci est un Test", "e") renvoie 3

A voir également

Ajouter un commentaire Commentaires
capoueidiablo
Messages postés
316
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
1 février 2010
1
18 sept. 2003 à 11:48
moi je ne suis ni pour ni contre ce code mais je trouve qu'il manque de commentaire, tout le monde n'est pas apte a comprendre ces ligne de codes
Yahan
Messages postés
37
Date d'inscription
jeudi 17 octobre 2002
Statut
Membre
Dernière intervention
27 octobre 2002

22 oct. 2002 à 22:44
pyrof et lamer ayez la critique instructive poser la votre ligne.

moi je le remerci et j'utilise toute ces lignes vu ke je ne sais faire autrement, si vous critiquez cette source il ne dois pas y avoir beaucoup de source valable pour vous

Yann, merci mec pour ta function
cs_SHIVA
Messages postés
97
Date d'inscription
vendredi 28 décembre 2001
Statut
Membre
Dernière intervention
1 décembre 2003

20 janv. 2002 à 16:50
MERCI !
plus simple
en une seule ligne

nombre=UBound(Split(chaine de reche, chaine à rechercher))
c à chier... tu le fait en - de 3 lignes ça

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.