StrComp, functie
Van toepassing op
Retourneert een variant (geheel getal) die het resultaat van een tekenreeksexpressie aangeeft.
Syntaxis
StrComp(tekenreeks1; tekenreeks2 [, vergelijken ] )
De syntaxis van de functie StrComp heeft deze argumenten:
| Argument | Beschrijving |
|---|---|
| tekenreeks1 | Vereist. Elke geldige tekenreeksexpressie. |
| tekenreeks2 | Vereist. Elke geldige tekenreeksexpressie. |
| vergelijken | Optioneel. Hiermee geeft u het type tekenreeksvergelijking op. Als het argument vergelijkenNull is, treedt er een fout op. Als vergelijken wordt weggelaten, bepaalt de instelling Optie vergelijken het type vergelijking. |
Instellingen
De instellingen voor het argument vergelijken zijn als volgt:
| Constante | Waarde | Beschrijving |
|---|---|---|
| vbBinaryCompare | 0 | Hiermee wordt een binaire vergelijking uitgevoerd. |
| vbTextCompare | 1 | Hiermee wordt een tekstvergelijking uitgevoerd. |
Retourwaarden
De functie StrComp heeft de volgende retourwaarden:
| Als | StrComp retourneert |
|---|---|
| tekenreeks1 is kleiner dan tekenreeks2 | -1 |
| tekenreeks1 is gelijk aan tekenreeks2 | 0 |
| tekenreeks1 is groter dan tekenreeks2 | 1 |
| tekenreeks1 of tekenreeks2 is Null | Null |
Queryvoorbeeld
| Expressie | Resultaten |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductVerkoop; | Retourneert de waarden uit het veld 'ProductID', vergelijkt de waarden in 'ProductID' met 'PRO_XYZ1' en retourneert de resultaten in kolom ComparisonResult. "ProductID" is gelijk aan "PRO_XYZ10", de functie StrComp retourneert 0. Als 'ProductID' kleiner is dan 'PRO_XYZ10', retourneert de functie StrComp -1. Als 'ProductID' groter is dan 'PRO_XYZ10', retourneert de functie StrComp 1. Als 'ProductID' of 'PRO_XYZ10' NULL is, retourneert de functie StrComp NULL. |
VBA-voorbeeld
Opmerking
In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht.
In dit voorbeeld wordt de functie StrComp gebruikt om de resultaten van een tekenreeksvergelijking te retourneren. Als het derde argument 1 is, wordt een tekstuele vergelijking uitgevoerd; als het derde argument 0 is of weggelaten, wordt een binaire vergelijking uitgevoerd.
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.