Yahan
Messages postés37Date d'inscriptionjeudi 17 octobre 2002StatutMembreDernière intervention27 octobre 2002
-
21 oct. 2002 à 18:38
nathansecret
Messages postés63Date d'inscriptionmardi 11 novembre 2008StatutMembreDernière intervention31 octobre 2011
-
27 avril 2011 à 19:00
nathansecret
Messages postés63Date d'inscriptionmardi 11 novembre 2008StatutMembreDernière intervention31 octobre 2011 27 avril 2011 à 19:00
En l'utilisant plusieurs fois à la suite, la fonction InStr peut planter (en tout cas chez moi)...
Vous pouvez aussi utiliser la fonction suivante, que j'ai nommée InStr2.
If InStr2("Salut c'est moi","Salut") Then MsgBox "C'est tout bon"
Function InStr2(ByVal Chaine As String, ByVal Texte As String) As Boolean
InStr2 = (Replace(Chaine, Texte, "") <> Chaine)
End Function