Vraća vrijednost Variant (Cijeli broj) koja označava rezultat nizovni izraz.
Sintaksa
StrComp ( niz1, niz2 [, usporedba ] )
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 je vrijednostargument null, pojavljuje se pogreška. Ako je usporedba izostavljena, postavka Usporedba mogućnosti određuje vrstu usporedbe. |
Postavke
Postavke argumenta usporedbe su:
|
Konstanta |
Vrijednost |
Opis |
|
vbBinaryCompare |
0 |
Izvodi binarnu usporedbu. |
|
vbTextCompare |
1 |
Izvodi tekstualnu usporedbu. |
|
vbDatabaseCompare |
2 |
Microsoft Office Access 2007 samo. Izvodi usporedbu na temelju podataka u bazi podataka. |
Vraćanje vrijednosti
Funkcija StrComp sadrži sljedeće povratne 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(IDproizvoda;"PRO_XYZ10") KAO UsporedbaResult FROMProizvodaProdaja; |
Vraća vrijednosti iz polja "IDProizvoda", uspoređuje vrijednosti u "IDproizvodu" s "PRO_XYZ1" i vraća rezultate u stupcu ComparisonResult. "PRODUCTID" jednak je "PRO_XYZ10", funkcija StrComp vratit će 0. Ako je "PRODUCTID" manji od "PRO_XYZ10", funkcija StrComp vratit će -1. Ako je "IDproizvoda" veći od "PRO_XYZ10", funkcija StrComp vratit će 1. Ako je "IDproizvoda" ili "PRO_XYZ10" NULL, funkcija StrComp vratit će vrijednost NULL. |
Primjer VBA-a
Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA).
U ovom se primjeru koristi funkcija StrComp da bi se vratili rezultati 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.
