Функция lstrcmpi

Declare Function lstrcmpi Lib "kernel32.dll" Alias "lstrcmpiA" (ByVal lpString1 As String, _
    ByVal lpString2 As String) As Long

Функция lstrcmpi сравнивает символы в двух строках без учета регистра букв. Сравнение происходит следующим образом: сначала сравниваются первые буквы строк, потом вторые и т.д. Для сравнения строк с учетом регистра используйте lstrcmp

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

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

Параметры

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

Пример

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

Смотри также

CompareString, lstrcmp

Категория

Строки