restituisce un valore Variant (Integer) che indica il risultato di un'espressione stringa.
Sintassi
StrComp(stringa1, stringa2 [, confronta ] )
Gli argomenti della sintassi della funzione StrComp sono i 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'argomentoconfronto è Null, si verifica un errore. Se il confronto 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 valori restituiti seguenti:
| 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 del campo IDProdotto, confronta i valori in IDProdotto con "PRO_XYZ1" e restituisce i risultati nella colonna ResultConfronto. "ProductID" è uguale a "PRO_XYZ10", la funzione StrComp restituirà 0. Se "ProductID" è minore di "PRO_XYZ10", la funzione StrComp restituirà -1. Se "IDProdotto" è 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).
In questo esempio viene usata 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.