Функция StrComp

Забележка: Бихме искали да ви осигурим най-новото помощно съдържание възможно най-бързо на вашия собствен език. Тази страница е преведена чрез автоматизация и може да съдържа граматически грешки и несъответствия. Нашата цел е това съдържание да ви бъде полезно. Можете ли да ни кажете дали информацията е била полезна за вас, в дъното на тази страница? Ето статията на английски за бърза справка.

Връща Variant (цяло число) посочващ резултата от низов израз.

Синтаксис

StrComp () string1, string2 [сравняват ] )

Синтаксисът на функцията StrComp има следните аргументи:

Аргумент

Описание

string1

Изисква се. Всеки валиден низ израз.

string2

Изисква се. Всеки валиден низ израз.

сравняване на

По желание. Указва типа на сравнение на низове. Ако сравнитеаргумент е Null, възниква грешка. Ако сравните е пропуснато, Опцията сравняване настройката определя типа на сравнение.


Настройки

Сравняване на настройките за аргумент са:

Константа

Стойност

Описание

vbBinaryCompare

0

Извършва двоични сравнение.

vbTextCompare

1

Извършва текстова сравнение.

vbDatabaseCompare

2

Microsoft Office Access 2007 само. Извършва сравнение въз основа на информацията във вашата база данни.


Връщат стойности

Функция StrComp има следните върнатите стойности:

Ако

StrComp връща

string1 е по-малко от string2

-1

string1 е равно на string2

0

string1 е по-голямо от string2

1

string1 или string2 е Null

Null


Пример

Забележка: Примери демонстрират използването на тази функция на Visual Basic for Applications (VBA) модул.

Този пример използва функцията StrComp да се върнете на резултатите от сравнение на низове. Ако третият аргумент е 1, текстови сравнението се извършва; Ако третият аргумент е 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.
Разширете уменията си в Office
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×