Сообщение LB_GETSELCOUNT

Сообщение LB_GETSELCOUNT получает число выделенных элементов в списке с множественным выделением. Аналогично свойству Visual Basic SelCount

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

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

Параметры

wParam

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

lParam

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

Константы

Const LB_ERR = -1

Пример

' Узнаем число выделенных строк в списке

Dim numsel As Long   ' число выделенных строк

' Подсчитываем число выделенных строк списка
numsel = SendMessage(List1.hWnd, LB_GETSELCOUNT, ByVal 0, ByVal 0)
If numsel = 0 Then
  Debug.Print "Нет выделенных слов"
Else
  Debug.Print numsel
End If

Смотри также

Категория