Сообщение CB_FINDSTRING

Const CB_FINDSTRING = &H14C

Сообщение CB_FINDSTRING находит заданную строку в комбинированном окне без учета регистра

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

В успешном случае сообщение возвращает отсчитываемый от нуля индекс найденной строки в комбинированном окне. В случае ошибки возвращается CB_ERR

Параметры

wParam
Индекс строки, с которой начнется поиск. Если при достижении последней строки комбинированного окна не было найдено заданной строки, то поиск начинается с первой строки. Для поиска с первой строки используйте -1
lParam
Строка для поиска с завершающим нулевым символом

Константы

Const CB_ERR = -1

Пример

' Ищем строку Русский в комбинированном окне.
' Разместите на форме ComboBox и кнопку Command1 для примера
' Добавьте в ComboBox строчки: Американский, Английский,
' Русский, Немецкий
Private Sub Command1_Click()
Dim retval As Long ' возвращаемое значение
' Ищем строчку в Combo1
retval = SendMessage(Combo1.hWnd, CB_FINDSTRING, -1, ByVal "Русский")
Print retval
End Sub

Смотри также

CB_FINDSTRINGEXACT

Категория

Комбинированное окно