Функция InStr

Връща позицията на низ в друг низ.

Функцията InStr връща позицията, в която е намерено съответствие. Ако низът не бъде намерен, функцията връща 0.

Синтаксис:


InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])

Връщана стойност:

Integer

Параметри:

Start: числов израз – позиция в низа, от която започва търсенето. Ако бъде пропуснат, търсенето започва от първия знак. Максималната разрешена стойност е 65535.

Text1: низът, който да бъде претърсен.

Text2: низът, който се търси.

Compare: незадължителен числов израз, определящ начина на сравняване. Възможните стойности са 0 и 1. Подразбираната стойност 1 означава сравняване с игнориране на регистъра на буквите. Стойност 0 означава двоично сравняване, чувствително към регистъра.

За да избегнете грешки при изпълнение, не задавайте параметър Compare ако първият параметър е пропуснат.

Кодове за грешка:

5 Невалидно извикване на процедура

Пример:


Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
    sInput = "Офис"
    iPos = InStr(sInput, "и")
    Print iPos
End Sub