Findinstr

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 061 fois - Téléchargée 38 fois

Contenu du snippet

Bon... Le titre est assez parlant... C'est une fonction qui permet de retourner la position d'un charactère / suite de charactères dans une chaine...
Je ne sais pas s'il existe une fonction comme cela dans VB, mais honnêtement, j'avais la flemme de chercher ;)

Source / Exemple :


Private Function FindInStr(ByVal sString As String, ByVal sWhat As String, Optional ByVal lFrom As Long = 1) As Long
    Dim N As Long
    
    For N = lFrom To Len(sString)
        If Mid(sString, N, Len(sWhat)) = sWhat Then Exit For
    Next N
    FindInStr = N - 1
End Function

Conclusion :


normalement pas de bug...

A voir également

Ajouter un commentaire Commentaires
Messages postés
962
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
2 août 2010
1
En passant il faut indiquer la position de depart,ex:instr(1,"a1a","a1")
Messages postés
93
Date d'inscription
samedi 9 juin 2001
Statut
Membre
Dernière intervention
6 mai 2005
1
merci... comme je l'ai dis, je ne connaissais pas de fonction pour le faire et je ne voulais pas chercher... Maintenant que je sais ca, je vais utiliser instr...
Messages postés
432
Date d'inscription
samedi 18 mai 2002
Statut
Modérateur
Dernière intervention
17 février 2014

Il ya aussi Instr("abcdefgh","cde") qui donne 3 et crois-moi ça doit surement être un peu plus performant, lol!!!!

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.