Visual Basic - Problema con una List y un TextBox

Mi problema es el siguiente:
La idea es tener una ListBox con varias líneas y un TextBox que muestra un dato (no tiene por qué ser el mismo de la lista) correspondiente a la línea del ListBox que seleccione. El dato del TextBox se puede cambiar de modo que cuando selecciono otra línea de la lista, se guarda el dato de la caja de texto en una matriz y accedo al dato de la nueva línea seleccionada. Parece que no debería tener complicación, no?. Pues no funciona. He codificado en el LostFocus de la caja de texto y no me guarda el dato. Qué podría hacer?. Gracias de antemano.

Puedes probar con el evento click.Al pulsar, el indice de la linea elegida se guarda en la propiedad ListIndex, creo recordar.Entonces, para coger el texto tendras que hacer algo parecido a esto:
textbox.text=listbox.list(listabox.listindex) o algo similar