Сообщение LB_GETSEL

Сообщение LB_GETSEL получает состояние выделения строки в списке. Аналогично свойству Visual Basic Selected

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

Если строка выделена, то возвращается положительное число. Если не выделена, то возвращается 0. В случае ошибки сообщение возвращает LB_ERR

Параметры

wParam

Отсчитываемый от нуля индекс проверяемой строки

lParam

Не используется - установите равным 0

Константы

Const LB_ERR = -1

Пример

' Проверим, выделен ли второй элемент списка

Dim sel As Long  ' состояние выделенной строки

' Выделен ли второй элемент списка
sel = SendMessage(List1.hWnd, LB_GETSEL, ByVal CLng(1), ByVal 0)
If sel > 0 Then
  Debug.Print "Вторая строка выделена"
ElseIf sel = 0  Then
  Debug.Print "Вторая строка не выделена"
Else
  Debug.Print "Произошла ошибка!"
End If

Смотри также

Категория