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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 11 767 fois - Téléchargée 47 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

c à chier... tu le fait en - de 3 lignes ça
plus simple
en une seule ligne

nombre=UBound(Split(chaine de reche, chaine à rechercher))
cs_SHIVA
Messages postés
97
Date d'inscription
vendredi 28 décembre 2001
Statut
Membre
Dernière intervention
1 décembre 2003
-
MERCI !
Yahan
Messages postés
37
Date d'inscription
jeudi 17 octobre 2002
Statut
Membre
Dernière intervention
27 octobre 2002
-
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
capoueidiablo
Messages postés
316
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
1 février 2010
1 -
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

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.