Funkce StrComp

Poznámka: Snažíme se pro vás co nejrychleji zajistit aktuální obsah nápovědy ve vašem jazyce. Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát ve spodní části této stránky vědět, jestli vám informace v článku pomohly? Pokud byste se rádi podívali na jeho anglickou verzi, najdete ji tady.

Vrátí hodnotu typu Variant (Integer) která vyjadřuje výsledek Řetězcový výraz.

Syntaxe

Funkce StrComp ( řetězec_1, řetězec_2 [porovnání ] )

Syntaxe funkce StrComp obsahuje následující argumenty:

Argument

Popis

řetězec_1

Povinné. Libovolný platný řetězcový výraz.

řetězec_2

Povinné. Libovolný platný řetězcový výraz.

porovnání

Volitelné. Určuje typ porovnání řetězců. Pokud porovnáníArgument hodnotu Null, dojde k chybě. Pokud vynecháte argument Porovnat nastavení Možnost porovnat Určuje typ porovnání.


Nastavení

Nastavení argument Porovnat je:

Konstanta

Hodnota

Popis

vbBinaryCompare

0

Provede binární porovnání.

vbTextCompare

1

Provede textové porovnání.

vbDatabaseCompare

2

Microsoft Office Access 2007 pouze. Provádí porovnání na základě informací v databázi.


Vrátí hodnoty

Funkce StrComp obsahuje následující návratové hodnoty:

Pokud

Funkce StrComp vrátí

řetězec_1 je menší než řetězec_2

-1

řetězec_1 je rovno řetězec_2

0

řetězec_1 je větší než řetězec_2

1

řetězec_1 nebo řetězec_2hodnotu Null.

Null


Příklad

Poznámka: Příklady ukazují použití této funkce v jazyce Visual Basic modulu Applications (VBA).

Tento příklad používá funkci StrComp vrací výsledky porovnání řetězců. Pokud třetí argument je 1, textové porovnání provádí; je-li tento argument vynechán, bude provedena binární porovnání nebo třetí argument je 0.

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.
Rozšiřte své dovednosti s Office
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor. Vypadá to, že bude užitečné, když vás spojíme s některým z našich agentů z podpory Office.

×