Rechercher un contenu dans une variable
Bonjour,
Je souhaite vérifier si le contenu d'un textbox ou d'une variable contient un mot.
Mes recherches m'ont permis de trouver la fonction "like"
J'ai monté un programme test afin de comprendre son utilisation mais il semble que je sache pas l'utiliser.
Ce programme me réponds toujours faux ?????
Pouvez vous m'éclairer ?
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| Sub test()
Dim test As String
Dim result As Boolean
Dim result1 As Single
test = "le bonjour j'aime le revolver"
result = test Like "le"
result1 = test Like "le"
MsgBox test & " : " & result & " - " & result1
If test Like "le" Then
MsgBox "vrai"
Else
MsgBox "faux"
End If
End Sub |
merci pour votre aide,
ET ZUT LA REPONSE VIENT D ARRIVER
Il fallait rajouter 2 "*" dans le contenu du mot à chercher :
Je l'ai trouvé dans un exemple qui m'a intrigué.
Par contre la condition ne fonctionne pas car elle reste toujours fausse
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| Sub test()
Dim test As String
Dim result As Boolean
Dim result1 As Single
test = "le bonjour j'aime le revolver"
result = test Like "*le*"
result1 = test Like "*le*"
MsgBox test & " : " & result & " - " & result1
If test Like "le" Then
MsgBox "vrai"
Else
MsgBox "faux"
End If
End Sub |
DONC ce code fonctionne :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
Sub test()
Dim test As String
Dim result As Boolean
test = "bonjour j'aime revolver"
result = test Like "*le*"
MsgBox test & " : " & result
If result = True Then
MsgBox "vrai"
Else
MsgBox "faux"
End If
End Sub |
Les explications sont très peu claire sur cette fonction !!!!!!
Cela aidera peut être quelqu'un d'autre dans l'avenir qui aura chercher comme moi !!
merci
