Nur ein Teil der Textbox

[Mister master]

Also die Frage wurde schon oft gestellt, aber nie gab es eine Antwort auf Genau DAS was ich will:

text1.text = asdfasdf hallo gogogogogo asdfasdfasdf

private sub command1_click()
If text1.text = *irgentwas davor* hallo *irgentwas danach* then
    msgbox"Hi! Wie gehts?"
End If

Das ist zwar nicht mein Projekt, aber meine Fragestellung kann man leichter erkennen ^^

Also, wie stelle ich das *irgentwas davor* und *irgentwas danach* ein, was für einen Code brauche ich dafür?

 

[Ein_Freund]

Hallo,

sorry, aber so ganz hab' ich noch nicht verstanden, was Du eigentlich möchtest. Möchtes Du herausfinden, ob in dem string 'hallo' vorkommt und dann ausschneiden, oder worum geht's !?

 

[Mister master]

So ungefähr! Ich will, dass wenn in text1.text "Hallo" vorkommt eine gewisse aktion durchgeführt wird!

 

[Ein_Freund]

Dafür gibt's halt die InStr()-Funktion, die Dir als Ergebnis den Zeichenindex des Beginns der Übereinstimmung liefert bzw sollte keine Übereinstimmung gefunden werden, eine null zurückgibt.

MsgBox InStr(1, "irgendwas_davor hallo irgendwas_danach", "hallo")