Функция StrComp

Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке).

Возвращает значение типа Variant (Integer), указывающее результат строковое выражение.

Синтаксис

StrComp ( строка1, строка2 [Сравнение ] )

Функция StrComp имеет следующие аргументы:

Аргумент

Описание

строка1

Обязательный аргумент. Любое допустимое строковое выражение.

строка2

Обязательный аргумент. Любое допустимое строковое выражение.

тип_сравнения

Необязательный аргумент. Указывает тип сравнения строк. Если Сравнитьаргумент равно Null, возникает ошибка. Если Сравнить опущен, параметр Option Compare определяет тип сравнения.


Параметры

Аргумент сравнение может принимать следующие значения:

Константа

Значение

Описание

vbBinaryCompare

0

Выполняется двоичное сравнение.

vbTextCompare

1

Выполняется текстовое сравнение.

vbDatabaseCompare

2

Только в Microsoft Office Access 2007. Выполняется сравнение на основе сведений из базы данных.


Возвращаемые значения

Функция StrComp имеет возвращает следующие значения:

Значение

StrComp возвращает

строка1 меньше, чем строка2

-1

строка1 — равно строка2

0

строка1 — больше, чем строка2

1

строка1 или строка2 is Null

Null


Пример

Примечание: Приведенных ниже примерах показано использование этой функции в проект Visual Basic для приложений (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

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×