Vráti hodnotu typu Variant (celé číslo), ktorá označuje výsledok reťazcového výrazu.
Syntax
StrComp(reťazec1, reťazec2 [, porovnať ] )
Syntax funkcie StrComp má tieto argumenty:
| Argument | Popis |
|---|---|
| reťazec1 | Povinný argument. Ľubovoľný platný reťazcový výraz. |
| reťazec2 | Povinný argument. Ľubovoľný platný reťazcový výraz. |
| compare | Voliteľný argument. Určuje typ porovnania reťazcov. Ak argument compareobsahuje hodnotu Null, vyskytne sa chyba. Ak compare nezadáte, typ porovnania určí nastavenie Option Compare . |
Nastavenia
Nastavenia argumentu compare sú:
| Konštanta | Hodnota | Popis |
|---|---|---|
| vbBinaryCompare | 0 | Vykonáva porovnanie na základe binárnych údajov. |
| vbTextCompare | 1 | Vykonáva textové porovnanie. |
Vrátené hodnoty
Funkcia StrComp obsahuje nasledujúce vrátené hodnoty:
| Ak | Funkcia StrComp vráti |
|---|---|
| reťazec1 je menší ako reťazec2 | -1 |
| reťazec1 sa rovná reťazec2 | 0 |
| reťazec1 je väčší ako reťazec2 | 1 |
| reťazec1 alebo reťazec2 má hodnotu Null | Null |
Príklad dotazu
| Výraz | Výsledky |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Vráti hodnoty z poľa IDProduktu, porovná hodnoty v poli IDProduktu s hodnotou PRO_XYZ1 a výsledky vráti v stĺpci VýsledokPorovnania. ID produktu sa rovná hodnote PRO_XYZ10, funkcia StrComp vráti hodnotu 0. Ak je hodnota IDProduktu menšia ako PRO_XYZ10, funkcia StrComp vráti hodnotu -1. Ak je hodnota IDProduktu väčšia ako PRO_XYZ10, funkcia StrComp vráti hodnotu 1. Ak je hodnota ID produktu alebo PRO_XYZ10 NULL, funkcia StrComp vráti hodnotu NULL. |
Príklad VBA
Poznámka
Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA).
V tomto príklade je funkcia StrComp použitá na vrátenie výsledkov porovnania reťazcov. Ak je tretí argument 1, vykoná sa textové porovnanie. Ak je tretí argument 0 alebo nie je zadaný, vykoná sa binárne porovnanie.
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.