Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает переменную Variant (Integer), показывающую результат сравнения строк.
Синтаксис
StrComp(string1, string2, [ compare ])
Синтаксис функции StrComp содержит следующие именованные аргументы:
| Part | Описание |
|---|---|
| строка1 | Обязательно. Любое допустимое строковое выражение. |
| строка2 | Обязательно. Любое допустимое строковое выражение. |
| compare | Необязательно. Задает тип сравнения строк. Если аргументсравнения имеет значение Null, возникает ошибка. Если аргумент сравнение опущен, тип сравнения определяется параметром Option Compare. |
Параметры
Аргумент compare может принимать следующие значения:
| Константа | Значение | Описание |
|---|---|---|
| vbUseCompareOption | –1 | Выполняет сравнение, используя параметр оператора Option Compare. |
| vbBinaryCompare | 0 | Выполняется двоичное сравнение. |
| vbTextCompare | 1 | Выполняется текстовое сравнение. |
| vbDatabaseCompare | 2 | Только Microsoft Access. Выполняется сравнение на основе сведений из базы данных. |
Возвращаемые значения
Функция StrComp имеет следующие возвращаемые значения:
| Если | StrComp возвращает |
|---|---|
| string1 меньше, чем string2 | –1 |
| string1 равна string2 | 0 |
| string1 больше, чем string2 | 1 |
| string1 или string2 равна Null | Null |
Пример
В этом примере функция 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 VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.