Listbox a textbox

Hola, gracias por responder, pero yo lo único que quiero es tomar el valor clave de items que inserte en el listbox. No esta relacionado con una tabla, porque es un filtro de dos tablas grandes de los cuales saco los 10 mejores, y no quiero dejar la consulta abierta, ni ocupar una vista ya que me parece un desperdicio de memoria.
Y lo solucione era simplemente
 thisform.text1.Value= thisform.list.ListItemId
me complique al p..., loq ue pasa q estoy acostumbrado  VB y me enrredo.
Muchas gracias