Returnerer en variant (heltall) som angir resultatet av et strenguttrykk.
Syntaks
StrComp(streng1; streng2 ; [, sammenlign ] )
Syntaksen for funksjonen StrComp har disse argumentene:
| Argumenter | Beskrivelse |
|---|---|
| streng1 | Obligatorisk. Et gyldig strenguttrykk. |
| streng2 | Obligatorisk. Et gyldig strenguttrykk. |
| sammenlign | Valgfritt. Angir strengsammenligningstypen. Hvis sammenligningsargumenteter Null, oppstår det en feil. Hvis sammenligning utelates, avgjør innstillingen Sammenligningsalternativ sammenligningstypen. |
Innstillinger
Innstillingene for sammenligningsargumentene er:
| Konstant | Verdi | Beskrivelse |
|---|---|---|
| vbBinaryCompare | 0 | Utfører en binær sammenligning. |
| vbTextCompare | 1 | Utfører en tekstsammenligning. |
Returverdier
StrComp-funksjonen har følgende returverdier:
| Hvis | Returnerer StrComp |
|---|---|
| streng1 er mindre enn streng2 | -1 |
| streng1 er lik streng2 | 0 |
| streng1 er større enn streng2 | 1 |
| streng1 eller streng2 er null | Null |
Eksempel på spørring
| Uttrykk | Resultater |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Returnerer verdiene fra feltet ProduktID, sammenligner verdiene i ProduktID med PRO_XYZ1 og returnerer resultatet i kolonnen Sammenligningsresultat. «ProductID» er lik «PRO_XYZ10», og StrComp-funksjonen returnerer 0. Hvis "ProduktID" er mindre enn "PRO_XYZ10", vil StrComp-funksjonen returnere -1. Hvis "ProduktID" er større enn "PRO_XYZ10", vil StrComp-funksjonen returnere 1. Hvis enten «ProduktID» eller «PRO_XYZ10» er NULL, returnerer StrComp-funksjonen NULL. |
VBA-eksempel
Obs!
I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications).
Dette eksemplet bruker StrComp-funksjonen til å returnere resultatet av en strengsammenligning. Hvis det tredje argumentet er 1, utføres en tekstsammenligning. Hvis det tredje argumentet er 0 eller utelates, utføres en binær sammenligning.
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.