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