Palauttaa muuttujan (kokonaisluvun), joka ilmaisee merkkijonolauseketuloksen.
Syntaksi
StrComp ( merkkijono1, merkkijono2 [, vertailu ] )
StrComp-funktion syntaksilla on seuraavat argumentit:
|
Argumentti |
Kuvaus |
|
merkkijono1 |
Pakollinen. Mikä tahansa kelvollinen merkkijonolauseke. |
|
merkkijono2 |
Pakollinen. Mikä tahansa kelvollinen merkkijonolauseke. |
|
vertailu |
Valinnainen. Määrittää merkkijonovertailun tyypin. Jos vertailuargumentti on tyhjäarvo, ilmenee virhe. Jos vertailu jätetään pois, Asetuksen vertailu -asetus määrittää vertailun tyypin. |
Asetukset
Vertailu-argumentin asetukset ovat seuraavat:
|
Vakio |
Arvo |
Kuvaus |
|
vbBinaryCompare |
0 |
Suorittaa binaarisen vertailun. |
|
vbTextCompare |
1 |
Suorittaa tekstivertailun. |
|
vbDatabaseCompare |
2 |
Vain Microsoft Office Access 2007 -sovelluksessa. Suorittaa tietokannan tietoihin perustuvan vertailun. |
Palautusarvot
StrComp-funktiolla on seuraavat palautusarvot:
|
Jos |
StrComp palauttaa |
|
merkkijono1 on pienempi kuin merkkijono2 |
-1 |
|
merkkijono1 on yhtä suuri kuin merkkijono2 |
0 |
|
merkkijono1 on suurempi kuin merkkijono2 |
1 |
|
merkkijono1 tai merkkijono2 on tyhjäarvo |
tyhjäarvo |
Esimerkki kyselystä
|
Lauseke |
Tulokset |
|
SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; |
Palauttaa arvot kentästä "Tuotetunnus", vertaa Tuotetunnus-kentän arvoja "PRO_XYZ1" -kenttään ja palauttaa tulokset sarakkeessa ComparisonResult. "ProductID" on yhtä suuri kuin "PRO_XYZ10", StrComp-funktio palauttaa arvon 0. Jos Tuotetunnus on pienempi kuin "PRO_XYZ10", StrComp-funktio palauttaa arvon -1. Jos Tuotetunnus on suurempi kuin "PRO_XYZ10", StrComp-funktio palauttaa arvon 1. Jos joko "ProductID" tai "PRO_XYZ10" on NULL, StrComp-funktio palauttaa NULL-arvon. |
VBA-esimerkki
Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa.
Tässä esimerkissä StrComp-funktion avulla palautetaan merkkijonovertailun tulokset. Jos kolmas argumentti on 1, suoritetaan tekstivertailu. jos kolmas argumentti on 0 tai se jätetään pois, suoritetaan binaarivertailu.
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.
