Returnează o valoare variant (număr întreg) care indică rezultatul unei expresii șir.
Sintaxă
StrComp(șir1, șir2 [, comparare ] )
Sintaxa funcției StrComp are următoarele argumente:
| Argument | Descriere |
|---|---|
| șir1 | Obligatoriu. Orice expresie șir validă. |
| șir2 | Obligatoriu. Orice expresie șir validă. |
| Compara | Opțional. Specifică tipul de comparație a șirurilor. Dacă argumentul de comparareeste Nul, apare o eroare. Dacă comparare este omisă, setarea Comparare opțiuni determină tipul de comparație. |
Setări
Setările argumentelor de comparare sunt:
| Constantă | Valoare | Descriere |
|---|---|---|
| vbBinaryCompare | 0 | Efectuează o comparație binară. |
| vbTextCompare | 1 | Efectuează o comparație textuală. |
Valori 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 Null | 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 ComparisonResult. "IdProdus" este egal cu "PRO_XYZ10", funcția StrComp va returna 0. Dacă "ProductID" 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 șiruri. 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.