Chercher une chaîne dans une autreRésolu

Question

Bonjour

je souhaiterai savoir comment chercher une suite caractères dans une chaîne.

Exemple comment trouver le mot "Vide" dans la phrase suivant "Le verre est vide"

bien sur ensuite valuer une function à true si Ok !

Merci beaucoup pour vos conseils.

Chocolat GC

GEDDi · Accepted Answer

Bonjour,

findWord = CBool(InStr(1, szSentence, szWordToFind))

ou encore 

findWord = InStr(1, szSentence, szWordToFind)

donneront EXACTEMENT LE MEME résultat vu que la fonction dans laquelle ce code se trouve est de type BOOLéenne, la fonction 'caste' pour toi.

J'ai juste donné le 'CBool' en guise d'aide à la compréhension fonctionnelle de la chose.
Testes par toi meme et tu verras :)

Gérôme GUILLEMIN
Auteur du langage FBSL

GEDDi · Answer

Bonjour,

Essayes ceci :

Sub test()
    MsgBox findWord("Le verre est vide", "vide")
End Sub

Public Function findWord(szSentence As String, szWordToFind As String) As Boolean
Const phrase = "Le verre est vide"
    findWord = CBool(InStr(1, szSentence, szWordToFind))
End Function

Gérôme GUILLEMIN
Auteur du langage FBSL

GEDDi · Answer

Once eugène...

Ceci :

Sub test()
    MsgBox findWord("Le verre est vide", "vide")
End Sub

Public Function findWord(szSentence As String, szWordToFind As String) As Boolean
    findWord = CBool(InStr(1, szSentence, szWordToFind))
End Function

Gérôme GUILLEMIN
Auteur du langage FBSL

Kristof_Koder · Answer

Il est généralement déconseillé de convertir un entier en booléen, donc je ferais plutot ceci :
findWord = (InStr(szSentence, szWordToFind) <> 0)

chocolatgc · Answer

Merci pour vos réponses, je vais essayer ça demain.

Chocolat GC

PS : je validerai par la même occasion ...

chocolatgc · Answer

Merci pour ton aide GEDDi, je me suis permis d'ajouter un argument :

findWord = InStr(1, szSentence, szWordToFind,1)

,1, afin de ne pas tenir compte des majuscules ou minuscule.

encore Merci

Chocolat GC

Chercher une chaîne dans une autre

6 réponses

Votre réponse

Discussions similaires