Funktion InStr

Gibt die Position einer vorhandenen Zeichenkette in einem anderen Zeichenkettenausdruck zurück.

Die Funktion InStr gibt die Position des Zeichens zurück, ab dem die gesuchte Zeichenkette in der zu durchsuchenden Zeichenkette enthalten ist. Ist die gesuchte Zeichenkette dort nicht enthalten, wird der Wert 0 zurückgegeben.

Syntax:

InStr ([Anfang As Integer,] Text1 As String, Text2 As String[, Vergleich])

Rückgabewert:

Integer

Parameter:

Anfang: Ein beliebiger numerischer Ausdruck, der die Position innerhalb der Zeichenkette festlegt, an der die Suche nach der angegebenen Unterzeichenkette begonnen werden soll. Wird dieser Parameter übergangen, so beginnt die Suche beim ersten Zeichen.

Text1: Der zu durchsuchende Zeichenkettenausdruck.

Text2: Der zu suchende Zeichenkettenausdruck.

Vergleich: Optionaler, numerischer Ausdruck, der die Art des Zeichenkettenvergleichs bestimmt. Dem Parameter kann der Wert 0 oder 1 zugewiesen werden. Die Voreinstellung 0 führt zu einem binären Vergleich, der Wert 1 zu einem Textvergleich ohne Berücksichtigung der Groß- und Kleinschreibung.

Der Parameter Compare darf nicht gesetzt werden, wenn der erste Übergabeparameter weggelassen wurde. Andernfalls kommt es zu einem Laufzeitfehler.

Beispiel:

Sub ExamplePosition

Dim sInput As String

Dim iPos As Integer

    sInput = "Star Office"

    iPos = Instr(sInput,"v")

    Print iPos

End Sub