Comment trouver le texte situer entre 2 carachteres ou 2 mots(version corriger)

Commenter

Contenu du snippet

Un exemple vaut mille mots:
(ex: je veux touver lol dans sdghdsdgaj:lol!dsa) sans utiliser find dans une richtextbox
      • Il y avait une petite erreur au lieu detre +1 sa devais etre + Len(debut)

merci de votre comprehension

Source / Exemple : 


'Source par yoman64
'o_s2@hotmail.com

Private Function Entre(source As String, depart As String, fin As String)
a=instr(1,source,depart) + len(depart)
b=instr(a,source,fin)
entre=mid(source,a,b)
End Function

Private Sub Command1_Click()
MsgBox Entre(Text1.Text, "aaa", "lolp")
End Sub

Conclusion :


merci de laisser des commentaires, constructif ou pas peut importe je cherche seulement a m'ameliorer car je ne suis qu'un debutant.

o_s2@hotmail.com

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_yoman64)