Buscar en un ListBox

Respuesta de
fvomaster
a
Usuario
Yo deseo ingresar un nombre en un textbox pero quiero que automáticamente lo busque en un ListBox, lo he intentado de todas formas y el código me sale bastante largo, te agradecería mucho si me pudieras ayudar. Gracias por responderme tan rápido.
Avatar
Experto
Hola nuevamente, en éste caso encontré el método utilizando una API, revísala por si acaso te sirviera..

Declaramos en el formulario :

Const LB_FINDSTRING = &H18F
Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Integer, ByVal wParam As Integer, lParam As Any) As Long


Para "encontrar" en el listbox lo tecleado en el textbox pondremos en el evento Change del textbox :

List1.ListIndex = SendMessage(List1.hWnd, LB_FINDSTRING, -1, ByVal Text1.Text)

El -1 significa buscar en toda la lista. Podemos poner el índice del elemento a partir del cual queremos buscar..

Espero que te sirva..

Un abrazo desde Chile.

fvomaster
Usuario
Eres un maestro. Gracias