Функция StrComp

Важно :  Данная статья переведена с помощью машинного перевода, см. Отказ от ответственности. Используйте английский вариант этой статьи, который находится здесь, в качестве справочного материала.

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

Синтаксис

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

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

Аргумент

Описание

строка1

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

строка2

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

Сравнение

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


Параметры

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

Константа

Значение

Описание

vbUseCompareOption

–1

Выполняется сравнение с помощью параметра инструкции 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). Чтобы получить дополнительные сведения о работе с 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.

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

Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

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

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

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

×