rechercher un texte strictRésolu

Question

slt les gars, j'ai un ptit probleme:

merci d'avance pour votre aide

private sub abc()
dim var1 as string
var1 "salut" 'ou var1 "bonjour salut ca va"

if instr(1,var1,"sa") then
   msgbox "trouvé" 'je veux que instr me renvoi la UNIQUEMENT si var1 contient "salut"
else
   msgbox "introuvable" 'je veux que instr me renvoi ici ....
end if

end sub

cs_kalif · Accepted Answer

slt en fait il faut chercher un mot dans une phrase mais j'ai mal rechercher sur le site et jviens de trouver ce qu'il me faut

merci a tous de votre aide rapide ;)

jmfmarques · Answer

Ah....
Et... si tu veux que Instr soit > 0 UNIQUEMENT (comme tu dis) si ver1 contient "salut" et pas "essayer"...
il ne te viendrait pas à l'idée de rechercher avec "salut" plutôt qu'avec "sa" ?

NHenry · Answer

Bonjour


Sauf erreur de ma part : 

instr(1,var1,"sa")
 équivalent à 

instr(var1,"sa")

Il est plus facile de batiser quelqu'un que de le convertir.(surtout en programmation)
VB (6, .NET1&2), C++, C#.Net1
Mon site

Renfield · Answer

oui,  sachant que la version :
If instr(1, var, "sa") >0 Then

sera plus rapide (un poil) car elle necessite moins de boulot en interne (substitution des parametres)

Renfield
Admin CodeS-SourceS- MVP Visual Basic

jmfmarques · Answer

Bon,
ceci étant dit...
Je demande à Kalif de réfléchir sur ces quelques aspects :


Voilà plusieurs phrases :


- Salut la compagnie
- Salutations à tous
- Il leur a envoyé son salut et ses salutations
- Pour un salut, c'en était un
- Leur a-t-il bien envoté son salut ?
- Le salut, c'est une forme de politesse
- Il leur a dit "Salut !"

et j'en passe...
Si, comme je le pense, il s'agit là d'un exercice, Kalif devra apprendre également les fonctions Len et Mid.
Il lui faudra commencer, avant tout développement, par déterminer, en français, ce qu'il cherche en fait.... (le reste viendra tout seul...)
Il devra également penser à la casse ... (à considérer ou non ?)... etc...
J'aimerais bien qu'il se penche de lui-même sur ces quelques aspects, avant d'aller plus loin...
Car : si l'on s'en tient très rigoureusement à ta question, Kalif, sans "se creuser les méninges à ta place", on arriverait tout bêtement à ceci :

Private Sub Command1_Click()
   toto = "et voilà mes salutations pour tous"
   If toto Like "*salut*" Then MsgBox "oui" Else MsgBox "non"
End Sub

Tu vois là fort bien, Kelif, à quel point il est absolument indispensable de définir très clairement et très précisément ses besoins.

Voilà !...

cs_kalif · Answer

salut dans mon cas on ne connais pas le contenu de la variable var1 . peut t etre qu'elle contient "salut" ou "bonjour" ou autre

jmfmarques · Answer

Tu viens de trouver ce qu'il te faut ?
Bien !
Mais j'espère pour toi que la casse est gérée,... et que sont également gérés d'autres cas, tel l'espace (devant et/ou derrière), ainsi que la virgule.
Rien n'est compliqué : juste une question de réflexion...

Rechercher un texte strict

7 réponses

Votre réponse