Funkcija StrComp

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 (sveikasis skaičius), nurodantį eilutės išraiškarezultatas.

Sintaksė

StrComp ( eilutė1, eilutė2 [palyginti ] )

Funkcijos StrComp sintaksės argumentai:

Argumentas

Aprašas

eilutė1

Būtina. Bet koks reiškinys svarbūs eilutę.

eilutė2

Būtina. Bet koks reiškinys svarbūs eilutę.

palyginimas

Pasirinktinai. Nurodo, kokio tipo eilutės palyginimas. Jei palygintiargumentas yra neapibrėžta, įvyksta klaida. Jei palyginimas nenurodytas, Parinkties palyginti parametras nustato, palyginimo tipą.


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ę

Funkcija StrComp, kuri turi grąžinamos reikšmės:

Jei

StrComp grąžina

eilutė1 yra mažesnė nei eilutė2

-1

eilutė1 yra lygi eilutė2

0

eilutė1 yra didesnė nei eilutė2

1

eilutė1 arba eilutė2 reikšmė yra nulis

Neapibrėžta reikšmė


Pavyzdys

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 StrComp grąžinti eilučių lyginimo rezultatus. Jei Trečiasis argumentas yra 1, atliekamas tekstinį lyginimą; Jei Trečiasis argumentas yra 0 arba nenurodytas, atliekama dvejetainį lyginimą.

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.

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ų.

×