30.04.2013 Views

1. Visual Basic - Curso completo teoria y practica

1. Visual Basic - Curso completo teoria y practica

1. Visual Basic - Curso completo teoria y practica

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

La sentencia Line Input se utiliza especialmente para leer<br />

un archivo de texto línea a línea, ya que esta sentencia lee<br />

todos los caracteres del archivo hasta que encuentra un retorno<br />

de carro, entonces continua en la siguiente línea y así<br />

sucesivamente. Por ejemplo:<br />

Dim N1 As Integer, LINE1 As String, LINE2 As String<br />

N1 = FreeFile()<br />

Open “C:\DATA\DEMO.TXT” For Output As # N1<br />

Print # N1, “Línea de prueba 1”<br />

Print # N1, “Línea de prueba 2”<br />

Close # N1<br />

Open “C:\DATA\DEMO.TXT” For Input As # N1<br />

Line Input # N1, LINE1<br />

MsgBox LINE1<br />

Line Input # N1, LINE2<br />

MsgBox LINE2<br />

La ejecución del código anterior produce la siguiente salida:<br />

Pág. 164

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!