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