Leer un fichero línea a línea

2082 vistas

Para leer un fichero línea a línea tendremos que usar un StreamReader y un ArrayList.

Veamos un ejemplo:



vbnet
  1. Imports System.IO
  2.  
  3.     Public Shared Function ReadByLine(ByVal path As String) As ArrayList
  4.         Dim miLector As StreamReader
  5.         Dim misLineas As New ArrayList
  6.  
  7.         Try
  8.             'path es la ruta completa al fichero a leer
  9.             miLector = New StreamReader(path)
  10.             With miLector
  11.                 ' posicionamos el flujo al inicio del fichero
  12.                 .BaseStream.Seek(0, SeekOrigin.Begin)
  13.                 While (.Peek > 0)
  14.                     ' leemos una línea del fichero
  15.                     misLineas.Add(.ReadLine)
  16.                 End While
  17.             End With
  18.         Catch ex As Exception
  19.             Console.WriteLine(ex.Message)
  20.         Finally
  21.             ' cerramos lector
  22.             miLector.Close()
  23.         End Try
  24.         Return misLineas
  25.     End Function