Funkcija "InStr"

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Grąžina į Variant (ilgas) nurodo pirmą vienos eilutės poziciją kitoje atsiradimo vietą.

Pažiūrėkite keletą pavyzdžių

Sintaksė

InStr eilutė1, eilutė2 () [Pradėti, ], [palyginti ] )

Funkcija InStr sintaksės argumentai:

Argumentas

Aprašas

pradėti

Pasirinktinai. Skaitmeninė išraiška, nustatanti pradinės vietos kiekvieno paiešką. Jei praleista, ieškos prasideda nuo pirmojo simbolio padėtį. Jei pradėti yra nulis, įvyksta klaida. Pradėti argumentas yra būtinas, jei nurodytas palyginimas .

eilutė1

Būtina. Eilutės išraiška, kurioje ieškoma.

eilutė2

Būtina. Eilutės išraiška ieškoma.

palyginimas

Pasirinktinai. Nurodo eilučių palyginimastipą. Jei palyginimas yra neapibrėžta, įvyksta klaida. Jei palyginimas nenurodytas, parinktiespalygintinustato palyginimo tipą. Nurodykite galiojantį LCID (VietosID) naudoti lokalės konkrečių taisyklių palyginimas.

Patarimas : "Access 2010", reiškinio daryklė pasižymi IntelliSense, kad galėtumėte matyti, kokie argumentai reiškinį reikia.

Parametrai

Palyginkite argumentas parametrai yra šie:

Konstanta

Reikšmė

Aprašas

vbUseCompareOption

-1

Atlieka palyginimas, naudojant Parinktį palyginti patvirtinimo parametras.

vbBinaryCompare

0

Atlieka dvejetainį lyginimą.

vbTextCompare

1

Atlieka tekstinį lyginimą.

vbDatabaseCompare

2

Microsoft Office Access 2007 tik. Atlieka palyginimas pagal informaciją duomenų bazėje.


Grąžina reikšmę

Jeigu

Grąžina InStr

eilutė1 yra nulinio ilgio

0

eilutė1 yra nulis

Null (neapibrėžta reikšmė)

eilutė2 yra nulinio ilgio

Pradžia

eilutė2, yra Null

Null (neapibrėžta reikšmė)

eilutė2 nerastas.

0

eilutė2 randamas eilutė1

Vietą, kurioje randamas atitikmuo

Pradžia > eilutė2

0


Pastabos

InStrB funkcija naudojama eilutės baito duomenims. Užuot grįžus simbolio padėtį pirmą vienos eilutės poziciją kitoje atsiradimo, InStrB grąžina baitų padėtį.

Pavyzdžiai

Naudokite išraišką "funkcija" InStr "    Galite naudoti InStr ten, kur galima naudoti išraiškas. Pvz., jei norite rasti pirmojo laikotarpio (.) lauke, kuriame yra IP adresai (pavadintas Ip_adresas), galite InStr jį rasti, tad:

InStr(1,[IPAddress],".")

Funkcija " InStr" tiria kiekvieną IPAddress lauko reikšmė, ir pateikia pirmojo laikotarpio padėtį. Taigi, jei pirmasis dalį IP adresas yra 10., funkcija pateikia 3 reikšmė.

Tada galite naudoti kitas funkcijas, veikia funkcija " InStr" išvestyje išskirti IP adresą, todėl prieš pirmąją laikotarpio, kaip dalį:

Left([IPAddress],(Instr(1,[IPAddress],".") -1))

Šiame pavyzdyje, InStr(1,[IPAddress],".") Grąžina pirmojo laikotarpio padėtį. Atimant 1 nustato, kiek simbolių prieš pirmojo laikotarpio, šiuo atveju 2. Funkciją kairėje tada išskiria simbolių nuo kairiajame lauko Ip_adresas pateikimas reikšmė 10.

Naudokite InStr VBA kode   

Pastaba : Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje naudojama funkcija " InStr" pateikti pirmą vienos eilutės poziciją kitoje atsiradimo vietą.

Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP" ' String to search in.
SearchChar = "P" ' Search for "P".
' A textual comparison starting at position 4. Returns 6.
MyPos = Instr(4, SearchString, SearchChar, 1)
' A binary comparison starting at position 1. Returns 9.
MyPos = Instr(1, SearchString, SearchChar, 0)
' Comparison is binary by default
' (last argument is omitted).
MyPos = Instr(SearchString, SearchChar) ' Returns 9.
MyPos = Instr(1, SearchString, "W") ' Returns 0.

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×