scusa mi è partito il file non avevo finito:
Open File For Input As #1
do until eof(1) è superfluo scrivere = true perchè è
implicito nella sua stessa definizione
cioè leggila così:do finchè il file non è alla fine .......
quindi = true è un info in più.
capito.so di essere stato un po contorto ma m'è venuta così.

Ricapitolando;(è solo un metodo pensato su due piedi che puoi perfezionare.)

do until eof(1)
(io preferisco scrivere Do while not EOF(1)
è lo stesso)
-------------------------------------------------

dim cnt
cnt = 0
Do while not EOF(1)

Line Input #1, Stringa
'leggi la prima riga che contiene le info relative alla prima voce della lista

if cnt = lstNomeLista.listindex
txtInformazione.Text = Stringa
exit do
end if
cnt = cnt + 1
Loop
Close #1

il tutto in un evento click della lista o combo associato ad un pulsanta
li vicino (è meglio)
Se hai bisogno di più spazio di una riga ,cioè credo 255
avanzi di dua righe alla volta....prova.
nel caso manda anche i file dove tieni le info che te lo faccio io.
Non è uno scherzo ora ho un po di tempo e mi diverto a fare programmini.
ciao.