Chercher si un mot est contenu dans une textbox Résolu

Question

Bonjour,

J'ai visual basic 2010 et je souhaite que lorsque je j'appuis sur le bouton nommé "button1", il cherche un mot contenu dans la textbox nommé "textbox1" défini dans les codes.

Exemple:
Code de button1:
if textbox1.text CONTIENT "AYYETTE" then
msgbox("Trouvé")
else
msgbox("raté")
end sub

J'attend vos réponses et je vous en remercie d'avance,
Cordialement,
Romain Quintaine

Patrice33740 · Accepted Answer

Bonjour,
Sans la casse :
If InStr(1, textbox1.Text, "AYYETTE", vbTextCompare) > 0 ThenNote : Dans l'éditeur Visual Basic, quand on place le curseur texte sur un mot du langage (par ex: InStr) et qu'on appuis sur la touche F1, on obtient l'aide VBA concernant ce mot (avec la solution ci-dessus).

Patrice33740 · Answer

If InStr(1, textbox1.Text, "AYYETTE") > 0 Then

minermine · Answer

Bonjour,

Le code marche super et si je souhaite que la casse ne soit pas prise en compte je doit faire:
If InStr(1, textbox1.Text, "AYYETTE") > 0 or InStr(1, textbox1.Text, "Ayyette") > 0 Then
Ou il y a une meilleur méthode,

Cordialement,
Romain Quintaine

_shadom · Answer

Bonjour,
Pour contourner la casse dans votre syntaxe sans poursuivre avec Or dans votre boucle If vous pouvez convertir le texte à comparer en lettre capitale puis comparer directement avec la valeur capitale du comparatif.
Soit : TextBox1.Text.ToUpper avec le comparatif "AYYETTE"
Ou : UCase(TextBox1.Text) avec le comparatif "AYYETTE".
Pour l'instant seuls les accents on échappés à cette règle à ma connaissance.
Bye ;)

minermine · Answer

Bonjour,
Merci, c'est vrai que je n'y avait pas pensé au pars avant. Et pour les accents, je les ai fait convertir ( par exemple é > e |  è >e ) et c'set parfait.
Cordialement, Romain Quintaine

Chercher si un mot est contenu dans une textbox

5 réponses

Discussions similaires

Newsletters