Tengo este codigo pero lee la primera linea de codigo si algien puede ayudarme gracias.
codigo:
Código:
Private Sub Command1_Click()
Dim nombreleido
fn = FreeFile
Open "D:\pepe.txt" For Input As #fn
Line Input #fn, nombreleido
Text1.text = nombreleido
Close #fn