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õrdlustüübi. Kui compareargument on Null, ilmneb tõrge. Kui argument compare puudub, määrab võrdluse tüübi säte Option Compare . |
Sätted
Argumendi võrdle sätted võivad olla järgmised.
|
Konstant |
Väärtus |
Kirjeldus |
|---|---|---|
|
vbBinaryCompare |
0 |
Teeb binaarvõrdluse. |
|
vbTextCompare |
1 |
Teeb tekstivõrdluse. |
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 |
Päringu näide
|
Avaldis |
Tulemid |
|---|---|
|
SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; |
Tagastab välja "TooteID" väärtused, võrdleb "TooteID" väärtusi väärtusega "PRO_XYZ1" ja tagastab tulemid veerus ComparisonResult. "ProductID" võrdub "PRO_XYZ10", tagastab funktsioon StrComp väärtuse 0. Kui "ProductID" on väiksem kui "PRO_XYZ10", tagastab funktsioon StrComp -1. Kui "ProductID" on suurem kui "PRO_XYZ10", tagastab funktsioon StrComp väärtuse 1. Kui kas "ProductID" või "PRO_XYZ10" on NULL, tagastab funktsioon StrComp nulli. |
VBA näide
Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis.
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.
