Vraća vrijednost Variant (cijeli broj) koja označava rezultat izraza niza.
Sintaksa
StrComp(niz1, niz2 [, usporedi ] )
Sintaksa funkcije StrComp sadrži ove argumente:
| Argument | Opis |
|---|---|
| niz1 | Obavezno. Bilo koji valjani nizovni izraz. |
| niz2 | Obavezno. Bilo koji valjani nizovni izraz. |
| usporedba | Neobavezno. Određuje vrstu usporedbe nizova. Ako argument usporedbeima vrijednost Null, doći će do pogreške. Ako izostavite usporedbu , postavka Mogućnost usporedbe određuje vrstu usporedbe. |
Postavke
Postavke argumenta usporedbe :
| Konstanta | Vrijednost | Opis |
|---|---|---|
| vbBinaryCompare | 0 | Izvodi binarnu usporedbu. |
| vbTextCompare | 1 | Izvodi tekstualnu usporedbu. |
Vraćene vrijednosti
Funkcija StrComp ima sljedeće vraćene vrijednosti:
| Ako | StrComp vraća |
|---|---|
| niz1 je manji od niza2 | -1 |
| niz1 jednak je nizu2 | 0 |
| niz1 je veći od niza2 | 1 |
| niz1 ili niz2 ima vrijednost null | Null |
Primjer upita
| Izraz | Rezultati |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS CompareResult FROM ProductSales; | Vraća vrijednosti iz polja "IDProizvoda", uspoređuje vrijednosti u polju "IDProizvoda" s vrijednošću "PRO_XYZ1" te vraća rezultate u stupcu RezultatUsporedbe. "IDProizvoda" jednako je "PRO_XYZ10", pa će funkcija StrComp vratiti 0. Ako je "IDProizvoda" manji od "PRO_XYZ10", funkcija StrComp vratit će -1. Ako je "IDProizvoda" veći od "PRO_XYZ10", funkcija StrComp vratit će 1. Ako je vrijednost "IDProizvoda" ili "PRO_XYZ10" NULL, funkcija StrComp vratit će NULL. |
VBA primjer
Napomena
Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA).
U ovom se primjeru koristi funkcija StrComp za vraćanje rezultata usporedbe nizova. Ako je treći argument 1, izvodi se tekstualna usporedba; Ako je treći argument 0 ili je izostavljen, izvodi se binarna usporedba.
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.