Visual Basic - Problemas para asociar un textbox y un listbox

Mi problema es el siguiente, quiero asociar un texbox y un listbox tal como lo hace la ayuda de Visual Basic.
Hasta el momento lo tengo casi hecho, es decir, escribo en el textbox y hago que el listbox deje en el top el elemento que mas se acerque al escrito en el textbox. Tambien selecciono un elemento del listbox, y este lo escribe en el textbox.
En resumidas cuentas, esta igual que la ayuda de Visual Basic, mi unico problema es como puedo hacer que el lisbox no pierda el foco, y con esto avanzar con las flechas. Ademas con esto puedo hacer que al escribir una palabra que no esta completa, elija el elemento del listbox que esta en el top o la que mas se le parezca a lo escrito.
De antemano gracias a quienes me puedan ayudar.

puedes capturar las teclas en el evento keyDown del textbox y mandarlas al controlador de evento que tengas para el listbox. Salud...

Quizas te ayude este ejemplo

Dim Consul As String
Consul = "select*" & _
"from tinve" & _
"where Clave01= " & List1.ItemData(List1.ListIndex)
mrs.Source = Consul
Set mrs.ActiveConnection = cn
mrs.Open

txtCoo.txt = mrs.Fields("codigo")
txtDee.Text = mrs.Fields("descrip")
txtCaa.Text = mrs.Fields("costo")
mrs.Close

Rod

Gracias por la ayuda. Yo ya tenia asociado el listbox y el textbox. Escribiendo en el textbox podia mover el tope de la lista con la propiedad TopIndex, pero no lo podia dejar seleccionado.
Lo que me faltaba hacer era cambiar la propiedad Index.