Restituisce un valore Variant (Integer) che indica il risultato di un'espressione stringa.
Sintassi
StrComp(stringa1; stringa2 [, confronto ] )
La sintassi della funzione StrComp ha gli argomenti seguenti:
| Argomento | Descrizione |
|---|---|
| stringa1 | Obbligatorio. Qualsiasi espressione stringa valida. |
| stringa2 | Obbligatorio. Qualsiasi espressione stringa valida. |
| compare | Facoltativo. Specifica il tipo di confronto tra stringhe. Se l'argomento compareè Null, si verifica un errore. Se confronta viene omesso, l'impostazione Confronto opzioni determina il tipo di confronto. |
Impostazioni
Le impostazioni dell'argomento compare sono:
| Costante | valore | Descrizione |
|---|---|---|
| vbBinaryCompare | 0 | Esegue un confronto binario. |
| vbTextCompare | 1 | Esegue un confronto di testo. |
Valori restituiti
La funzione StrComp ha i seguenti valori restituiti:
| Se | StrComp restituisce |
|---|---|
| stringa1 è minore di stringa2 | -1 |
| stringa1 è uguale a stringa2 | 0 |
| stringa1 è maggiore di stringa2 | 1 |
| stringa1 o stringa2 è Null | Null |
Esempio di query
| Espressione | Risultati |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Restituisce i valori dal campo "IDProdotto", confronta i valori in "IDProdotto" con "PRO_XYZ1" e restituisce i risultati nella colonna ComparisonResult. "IDProdotto" è uguale a "PRO_XYZ10", la funzione StrComp restituirà 0. Se "PRODUCTID" è minore di "PRO_XYZ10", la funzione StrComp restituirà -1. Se "PRODUCTID" è maggiore di "PRO_XYZ10", la funzione StrComp restituirà 1. Se "ProductID" o "PRO_XYZ10" è NULL, la funzione StrComp restituirà NULL. |
Esempio di VBA
Nota
Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA).
Questo esempio usa la funzione StrComp per restituire i risultati di un confronto tra stringhe. Se il terzo argomento è 1, viene eseguito un confronto testuale; se il terzo argomento è 0 o è omesso, viene eseguito un confronto binario.
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.