La manera clasica
Publicado por Federico (54 intervenciones) el 18/04/2006 15:33:47
Dim Canal as Long
dim datos as string
canal=freefile
open archivo FOR INPUT as canal
'Si quieres leer la segunda linea
input #canal, datos
input #canal,datos
'Si quieres leer todos el archivo
do while not eof(canal)
input #canal, data
loop
close canal
dim datos as string
canal=freefile
open archivo FOR INPUT as canal
'Si quieres leer la segunda linea
input #canal, datos
input #canal,datos
'Si quieres leer todos el archivo
do while not eof(canal)
input #canal, data
loop
close canal
Valora esta pregunta
0