InStr funkcija

Grąžina eilutės poziciją kitoje eilutėje.

Funkcija „Instr“ grąžina poziciją, kurioje buvo rasta atitiktis. Jei eilutė nerasta, funkcija grąžina 0.

Sintaksė:


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

Grąžinama reikšmė:

Sveikasis skaičius

Parametrai:

Start: A numeric expression that marks the position in a string where the search for the specified substring starts. If you omit this parameter, the search starts at the first character of the string. The maximum allowed value is 65535.

Tekstas1: Eilutės reiškinys, kurį norite surasti.

Tekstas2: Eilutės reiškinys, kurį norite surasti.

Palyginti: Pasirenkamas skaitinis reiškinys, apibrėžiantis palyginimo tipą. Šio parametro reikšmė gali būti 0 arba 1. Numatytoji reikšmė 1 nurodo teksto palyginimą, kuriame didžiosios ir mažosios raidės neskiriamos. 0 reikšmė nurodo dvejetainį palyginimą, kuriame didžiosios ir mažosios raidės skiriamos.

Jei norite išvengti vykdymo klaidos, nenustatykite parametro „Compare“, jei praleistas pirmasis reikšmės parametras.

Klaidos kodai:

5 Neteisingas procedūros iškvietimas

Pavyzdys:


Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
    sInput = "Office"
    iPos = Instr(sInput,"c")
    Print iPos
End Sub