Discussion :

[benhsaien]

Bonjour,
j'ai une chaine de caractére par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Var_test="520|00000010001|001295|002350|004350|0082"

Besoin ces d'effectuer une recherche, si par exemple 002350 existe sur la chaîne ou non ?

Existe t'il une fonction prédéfinie,ou il faut faire un traitement ?.

Merci D'avance.

[ProgElecT]

Salut

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If InStr(MaChaine, TextRechercher) <> 0 Then
    'trouvé
    Else
    'TextRechercher n'est pas présent dans MaChaine
End If

[benhsaien]

Salut,
Merci pour la réponse,mais la fonction InStr cherche un index pas toute la phrase(chaîne complète).

[hackoofr]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
TextRechercher = "002350"
MaChaine1 = "520|00000010001|001295|002351|004350|0082"
MaChaine2 = "520|00000010001|001295|002350|004350|0082"
 
Call TestExist(MaChaine1,TextRechercher)
Call TestExist(MaChaine2,TextRechercher)
 
'***************************************************************
Function TestExist(MaChaine,TextRechercher)
If InStr(MaChaine,TextRechercher) <> 0 Then
    MsgBox "Le "&TextRechercher&" a ete trouve dans  la chaine " & MaChaine,64,"Trouve"
    Else
    Msgbox "Le "&TextRechercher&" n'est pas present dans " & MaChaine,16,"Pas Trouve"
End If
End Function
'****************************************************************

[hackoofr]

il y a aussi une contribution de l_autodidacte
Une fonction recherchant l'occurrence d'une chaîne dans un fichier texte