Функция lstrcmp

Declare Function lstrcmp Lib "kernel32.dll" Alias "lstrcmpA" (ByVal lpString1 As String, _
    ByVal lpString2 As String) As Long
Функция lstrcmp сравнивает две строки с учетом регистра букв. Сравнение происходит следующим образом: сначала сравниваются первые буквы строк, потом вторые и т.д. Для сравнения строк без учета регистра используйте lstrcmpi

Возвращаемое значение

Если строка lpString1 меньше,чем строка lpString2, то возвращается отрицательное число. Если первая строка больше второй, то число положительно. Если строки равны, то возвращается 0

Параметры

lpString1
Первая строка для сравнения
lpString2
Вторая строка

Пример

' Сравним два слова "Русский" и "русская"
Dim retval As Long
retval = lstrcmp("Русский", "русская")
If retval > 0 Then
  MsgBox "Первое слово больше второго"
ElseIf retval = 0 Then
  MsgBox "Строки равны"
Else
  MsgBox "Второе слово больше первого"
End If

Смотри также

CompareString, lstrcmpi
Категория
Строки