VBNet - Форум - Как выбрать элемент в списке в ListBox ?

Вопрос: Как выбрать элемент в списке в ListBox ? Добавлено: 05.12.03 17:38

Автор вопроса: SLV

Есть форма, на ней ListBox - одно окно. Заполняется элементами массива. Как выбрать искомую строку ?
...
    strArray(i) = strClientName & String(30 - Len(strClientName), "_") & rClientSaldo
    lstList.AddItem strArray(i)
    Пробовал lstList.ListIndex(i).SetFocus , не работает, видимо "(i)" не работает.
    Пробовал выделить цветом при соответствии названий strArray(i).Font.Bold = True , выделяет цветом фон всего окна.
Беру помощь знатоков

Ответить

Ответы Всего ответов: 5

Номер ответа: 1
Автор ответа:

SLV

Вопросов: 4
Ответов: 10

Профиль | | #1

Добавлено: 05.12.03 17:51

Я уточню.

Есть БД с кучей позиций. Для каждой позиции есть сальдо. Кликом я выбрал позицию в другом листе. Мне необходимо чтобы при вызове формы с ListBox фокус передавался именно на эту, выбранную позицию.

Ответить

Номер ответа: 2
Автор ответа:

NeForm@t

ICQ: 252999255

Вопросов: 36
Ответов: 247

Web-сайт: g--k.newmail.ru
Профиль | | #2

Добавлено: 05.12.03 18:12

Стандартными средствами вроде нельзя, так что деожи:

Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const LB_SETCURSEL As Long = &H186
Private Sub Command1_Click()
SelectI List1.hwnd, 2
End Sub
Sub SelectI(LBhwnd As Long, index As Integer)
SendMessage LBhwnd, LB_SETCURSEL, index, 0
End Sub

'SelectI - первый параметр это list1.hwnd, 2 - index

'api - дёшево и сердито