Returnează o variantă (număr întreg) care indică rezultatul unei expresii șir de caractere.
Sintaxă
StrComp(șir1, șir2 [, compară ] )
Sintaxa funcției StrComp are următoarele argumente:
| Argument | Descriere |
|---|---|
| șir1 | Obligatoriu. Orice expresie șir validă. |
| șir2 | Obligatoriu. Orice expresie șir validă. |
| compară | Opțional. Specifică tipul de comparație a șirurilor. Dacă argumentul de comparareeste Nul, apare o eroare. Dacă opțiunea comparare este omisă, setarea Comparare opțiuni determină tipul de comparație. |
Setări
Setările de comparare a argumentelor sunt:
| Constantă | Valoare | Descriere |
|---|---|---|
| vbBinaryCompare | 0 | Efectuează o comparație binară. |
| vbTextCompare | 1 | Efectuează o comparație textuală. |
Valorile returnate
Funcția StrComp are următoarele valori returnate:
| Dacă | StrComp returnează |
|---|---|
| șir1 este mai mic decât șir2 | -1 |
| șir1 este egal cu șir2 | 0 |
| șir1 este mai mare decât șir2 | 1 |
| șir1 sau șir2 este Nul | Nul |
Exemplu de interogare
| expresie | Rezultatele |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Returnează valorile din câmpul "IDProdus", compară valorile din "IDProdus" cu "PRO_XYZ1" și returnează rezultatele în coloana RezultatComparație. "ProductID" este egal cu "PRO_XYZ10", funcția StrComp va returna 0. Dacă "IDProdus" este mai mic decât "PRO_XYZ10", funcția StrComp va returna -1. Dacă "ProductID" este mai mare decât "PRO_XYZ10", funcția StrComp va returna 1. Dacă "ProductID" sau "PRO_XYZ10" este NULL, funcția StrComp va returna NULL. |
Exemplu VBA
Notă
Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA).
Acest exemplu utilizează funcția StrComp pentru a returna rezultatele unei comparații de șir. Dacă al treilea argument este 1, se efectuează o comparație textuală; Dacă al treilea argument este 0 sau omis, se efectuează o comparație binară.
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.