Повертає значення типу Variant (Integer), яке позначає результат рядкового виразу.
Синтаксис
StrComp(string1, string2 [, compare ] )
Синтаксис функції StrComp має такі аргументи:
| Аргумент | Опис |
|---|---|
| string1 | — обов’язковий аргумент. Будь-який дійсний рядковий вираз. |
| string2 | — обов’язковий аргумент. Будь-який дійсний рядковий вираз. |
| compare | — необов’язковий аргумент. Визначає тип порівняння рядків. Якщо аргумент порівняннямає Null-значення, стається помилка. Якщо значення аргументу "Порівняти" пропущено, параметр Option Compare визначає тип порівняння. |
Параметри
Параметри аргументу compare:
| Константа | Значення | Опис |
|---|---|---|
| vbBinaryCompare | 0 | Виконує двійкове порівняння. |
| vbTextCompare | 1 | Виконує текстове порівняння. |
Значення, що повертаються
Функція StrComp повертає такі значення:
| Якщо | Результат StrComp |
|---|---|
| string1 менше за string2 | –1 |
| string1 дорівнює string2 | 0 |
| рядок1 більше рядка2 | 1 |
| string1 або string2 має Null-значення | Null-значення |
Приклад запиту
| Вираз | Результати. |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID;"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | Повертає значення з поля «Ідентифікатор_продукту», порівнює значення в полі «Ідентифікатор_продукту» з «PRO_XYZ1» і повертає результати у стовпці ComparisonResult. "ProductID" дорівнює "PRO_XYZ10", функція StrComp поверне 0. Якщо значення аргументу "Ідентифікатор_продукту" менше за "PRO_XYZ10", функція StrComp поверне -1. Якщо значення аргументу "Ідентифікатор_продукту" більше за "PRO_XYZ10", функція StrComp поверне значення 1. Якщо "ProductID" або "PRO_XYZ10" має Null-значення, функція StrComp поверне NULL-значення. |
Приклад VBA
Примітка.
У прикладах нижче показано використання цієї функції в модулі 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.