fonction qui conte le nombre de fois qu'une chaine se retrouve dans une autreRésolu

Question

Bonjour ,

Je crois que ma recherche se trouve dans le titre ... Merci de me répondre

Utilisateur anonyme · Accepted Answer

Un exemple simple :

Const Str As String = "Bonjour CodeS-SourceS"
MsgBox UBound(Split(Str, "ou")) 'Retourne 2

jmfmarques · Answer

Split



Je crois que ta recherche se trouve dans l'aide en ligne ou avec F1 sur ce mot

cs_Willi · Answer

Bonsoir,
Merci de faire une recherche sur le site et/ou le forum, ou voir sur codyx.org, c'est une question qui revient régulièrement sur le forum.

Utilisateur anonyme · Answer

Salut,





Attention


, on ne demmande pas de programme tout fait.
T'as au moins des idées j'espére.
Je te met sur la voie, utilise InStr et une boucle. (je t'ai même tout dis)






__________
Kenji

Utilisateur anonyme · Answer

Bien joué jmf, je n'avais pas pensé avec split.
C'est encore mieux.






__________
Kenji

noz666 · Answer

je vois pas le rapport avec split :(  mais pour la boucle je mets quoi comme condition?

Merci

noz666 · Answer

Alors la je suis ton homme merci beaucoup

Renfield · Answer

Split est efficace, mais lent...
on génère ici un tableau de chaine de caractère, ce qui peut etre assez lourd.

Const Str As String = "Bonjour CodeS-SourceS"
MsgBox UBound(Split(Str, "ou")) 'Retourne 2 
Retournera en fait 1, car tu affiches le UBound...

voici une fonction plus rapide, qui utlilise ce que tu Charles a énoncé en premier (Instr et Boucle) :

Public Function Count(ByRef 
vsInput As String, ByRef vsPattern As String, Optional ByVal veCompare As VbCompareMethod = vbBinaryCompare) As Integer
Dim
 i As Long
    i = InStr(1, vsInput, vsPattern, veCompare)
    Do While i
        Count = Count + 1
        i = InStr(i + 1, vsInput, vsPattern, veCompare)
    Loop
End Function

Qui est visible sur 
http://www.codyx.org/snippet_compter-nombre-occurrence-chaine-dans-autre_158.aspx

En effet, Codyx est là pour toutes ces petites fonctions du quotidien......

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Fonction qui conte le nombre de fois qu'une chaine se retrouve dans une autre

8 réponses

Votre réponse

Discussions similaires