Problemas con LineInput!

[KazerPowa]

Vale.....ya pude solucionarlo.

La solución era:

Código vb:

1.
   
                Do Until EOF(1)
  
   
                          ListBox1.Items.Add(LineInput(1))
 
                          ListBox2.Items.Add(LineInput(1))
 
                          ListBox3.Items.Add(LineInput(1))
 
                  Loop
 

Así de sencillo.