Returnerar ett värde av datatypen Variant (Heltal) som anger resultatet av ett stränguttryck.
Syntax
StrComp(sträng1; sträng2 [, jämför ] )
Syntaxen för funktionen StrComp har följande argument:
| Argument | Beskrivning |
|---|---|
| sträng1 | Obligatoriskt. Ett giltigt stränguttryck. |
| sträng2 | Obligatoriskt. Ett giltigt stränguttryck. |
| jämför | Valfritt. Anger typen av strängjämförelse. Om argumentet jämförär Null uppstår ett fel. Om jämför utelämnas bestämmer inställningen Alternativjämförelse typen av jämförelse. |
Inställningar
Inställningarna för argumentet jämför är:
| Konstant | Värde | Beskrivning |
|---|---|---|
| vbBinaryCompare | 0 | Utför en binär jämförelse. |
| vbTextCompare | 1 | Utför en textjämförelse. |
Returvärden
Funktionen StrComp har följande returvärden:
| Om | StrComp returnerar |
|---|---|
| sträng1 är mindre än sträng2 | -1 |
| sträng1 är lika med sträng2 | 0 |
| sträng1 är större än sträng2 | 1 |
| sträng1 eller sträng2 är Null | Null |
Frågeexempel
| Uttryck | Resultat |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Returnerar värdena från fältet "ProductID", jämför värdena i "ProductID" med "PRO_XYZ1" och returnerar resultatet i kolumnen ComparisonResult. "ProductID" är lika med "PRO_XYZ10" returnerar funktionen StrComp 0. Om "ProductID" är mindre än "PRO_XYZ10" returnerar funktionen StrComp -1. Om "ProductID" är större än "PRO_XYZ10" returnerar funktionen StrComp 1. Om antingen "ProductID" eller "PRO_XYZ10" är NULL returnerar funktionen StrComp NULL. |
VBA-exempel
Obs
I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA).
I det här exemplet används funktionen StrComp för att returnera resultatet av en strängjämförelse. Om det tredje argumentet är 1 utförs en textjämförelse. Om det tredje argumentet är 0 eller utelämnas utförs en binär jämförelse.
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.