Funktsioon StrComp

Tagastab e tulemit tähistava variandi (täisarvstringavaldis).

Süntaks

StrComp ( string1, string2 [, võrdlus ] )

Funktsioonil StrComp on järgmised argumendid.

Argument

Kirjeldus

string1

Nõutav. Mis tahes sobiv stringavaldis.

string2

Nõutav. Mis tahes sobiv stringavaldis.

võrdlus

Valikuline. Määrab stringivõrdluse tüübi. Kui argumendil võrdlus on tühiväärtus, ilmneb tõrge. Kui argument võrdle puudub, määrab võrdluse tüübi lausega Option Compare määratud säte.


Sätted

Argumendi võrdle sätted võivad olla järgmised.

Konstant

Väärtus

Kirjeldus

vbUseCompareOption

-1

Kasutab võrdlemiseks lauses Option Compare määratud sätet.

vbBinaryCompare

0

Teeb binaarvõrdluse.

vbTextCompare

1

Teeb tekstilise võrdluse.

vbDatabaseCompare

2

Ainult Microsoft Office Access 2007. Võrdleb andmebaasis olevate väärtuste põhjal.


Tagastusväärtused

Funktsioon StrComp võib tagastada järgmised väärtused.

Tingimus

StrComp tagastab

string1 on väiksem kuistring2

-1

string1 võrdub string2-ga

0

string1 on suurem kui string2

1

string1 või string2 on tühiväärtusega

Tühiväärtus


Näide

Märkus. : Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni StrComp stringivõrdluse tulemite tagastamiseks. Kui kolmas argument on 1, tehakse tekstiline võrdlus; kui kolmas argument on 0 või puudub, tehakse binaarvõrdlus.

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.
Täiendage oma oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×