Funkce InStr
Vrátí pozici řetězce v jiném řetězci.
Funkce Instr vrátí pozici, na které nalezne shodný řetězec. Pokud řetězec nenalezne, vrátí funkce 0.
Syntaxe:
InStr ([Začátek As Long,] Text1 As String, Text2 As String[, Porovnání])
Návratová hodnota:
Celé číslo
Parametry:
Začátek: Číselný výraz, který označuje pozici v řetězci, kde začíná hledání podřetězce. Pokud tento parametr vynecháte, hledání začne na prvním znaku řetězce. Maximální povolená hodnota je 65535.
Text1: Řetězec, který chcete prohledat.
Text2: Řetězec, který chcete najít.
Porovnání: Nepovinný číselný výraz, který určuje druh porovnávání. Hodnota tohoto parametru může být 0 nebo 1. Výchozí hodnota 1 určuje, že při porovnání textu nezávisí na velikosti znaků. Hodnota 0 určuje binární porovnávání, kdy závisí na velikosti znaků.
Chcete-li se vyhnout chybám, nenastavujte parametr Porovnat, pokud vynecháte první parametr.
Příklad:
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "Office"
iPos = Instr(sInput,"c")
Print iPos
End Sub