Pateikia variantą (sveikąjį skaičių), nurodantį eilutės išraiška rezultatą.
Sintaksė
StrComp ( eilutė1, eilutė2 [, palyginti ] )
Funkcijos StrComp sintaksė turi tokius argumentus:
|
Argumentas |
Aprašas |
|
eilutė1 |
Būtinas. Bet kuris galiojantis eilutės reiškinys. |
|
eilutė2 |
Būtinas. Bet kuris galiojantis eilutės reiškinys. |
|
palyginti |
Pasirinktinis. Nurodo eilučių palyginimo tipą. Jei palyginimoargumentas yra Null, įvyksta klaida. Jei palyginti praleidžiamas, parametras "Option Compare " nustato palyginimo tipą. |
Parametrai
Argumento palyginti parametrai yra:
|
Konstanta |
Reikšmė |
Aprašas |
|
vbBinaryCompare |
0 |
Atlieka dvejetainį palyginimą. |
|
vbTextCompare |
1 |
Atlieka tekstinį palyginimą. |
|
vbDatabaseCompare |
2 |
tikMicrosoft Office Access 2007. Atlieka palyginimą pagal jūsų duomenų bazės informaciją. |
Pateikti reikšmes
Funkcija StrComp turi šias grąžinamas reikšmes:
|
If |
StrComp grąžinimas |
|
eilutė1 yra mažesnė nei eilutė2 |
–1 |
|
eilutė1 yra lygi eilutei2 |
0 |
|
eilutė1 yra didesnė už eilutę2 |
1 |
|
eilutė1 arba eilutė2 yra Neapibrėžta (Null) |
Null |
Užklausos pavyzdys
|
Reiškinys |
Rezultatai |
|
SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; |
Grąžina reikšmes iš lauko "ProductID", lygina "ProductID" reikšmes su "PRO_XYZ1" ir pateikia stulpelio ComparisonResult rezultatus. "ProductID" yra lygus "PRO_XYZ10", "StrComp" funkcija pateiks 0. Jei "ProductID" yra mažesnis už "PRO_XYZ10", "StrComp" funkcija pateiks -1. Jei "ProductID" yra didesnis už "PRO_XYZ10", "StrComp" funkcija pateiks 1. Jei "ProductID" arba "PRO_XYZ10" yra NULL, StrComp funkcija pateiks NULL. |
VBA pavyzdys
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje.
Šiame pavyzdyje naudojama funkcija StrComp , kad būtų pateikti eilučių palyginimo rezultatai. Jei trečiasis argumentas yra 1, atliekamas tekstinis palyginimas; jei trečiasis argumentas yra 0 arba praleistas, atliekamas dvejetainis palyginimas.
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.
