Esta lección es parte de un tutorial en curso. La primera parte está aquí: Cómo para abrir un archivo de texto en VB .NET
A menudo, no quieres leer todo el archivo de una sola vez. Usted quieren leerlo línea por línea. En cuyo caso, en lugar de usar el ReadToEnd como hicimos en la sección anterior, puedes utilizar el método ReadLine :
El método ReadLine, como su nombre indica, lee el texto una línea a la vez. En Sin embargo, para hacer esto, necesitas usar un bucle. Luego puedes hacer un bucle alrededor de cada y lo leen en una variable. Aquí hay un ejemplo de codificación:
Dim TextLine As String
Do While objReader.Peek(); -1
TextLine = TextLine & objReader. ReadLine () & vbNewLine
Lazo
La primera línea del bucle Do While es bastante curiosa:
Do While objReader.Peek(); -1
El método Peek echa un vistazo a los caracteres de texto entrantes. Está mirando por delante de un personaje a la vez. Si no ve más personajes, se devuelven un valor de menos 1. Esto significará el final del archivo de texto. Nuestro bucle comprueba esto menos 1, y se salva cuando Peek tiene este valor.
Dentro del bucle, estamos leyendo cada línea del archivo de texto y poniendo en nueva variable. (También estamos añadiendo un nuevo carácter de línea al final. Borrar el & vbNewLine y ver qué pasa).
objReader.ReadLine()
Así que el método ReadLine lee cada línea por ti, en lugar del ReadToEnd método que obtiene todo el archivo de texto.
Una vez que tienes una línea de texto en tu variable, sin embargo, depende de ti analizar …lo… Por ejemplo, supongamos que la línea de texto que viene del archivo de texto es esta:
«Nombre de usuario1, Contraseña1, Nombre de usuario2, Contraseña2»
Entonces tendrías que cortar la línea y hacer algo que cada segmento. VB no hará esto por ti! (Pero viste cómo hacer esto en la última sección, cuando usaste cosas como Split y Substring).
Pero lo que estás haciendo en el Do Loop es construir tu variable con líneas de texto que se extraen de su archivo de texto. Una vez que hayas sacado todo el texto de tu archivo, puedes ponerlo en el cuadro de texto. Aquí está nuestro programa una vez más:
Dim FILE_NAME As String = «C:UsersOwnerDocumentsTest.txt»
Dim TextLine As String
Si System.IO.File.Exists( FILE_NAME ) = True Then
Dim objReader As New System.IO.StreamReader(FILE_NAME)
Do While objReader.Peek(); -1
TextLine = TextLine & objReader.ReadLine() & vbNewLine
Lazo
Textbox1.Text = TextLine
Else
MessageBox.Show(«El archivo no existe»)
Finalizar si
Así que dentro del bucle, vamos construyendo la variable TextLine . Una vez que todo el archivo ha sido leído (cuando Peek() tiene un valor de -1), entonces lo colocamos en Cuadro de texto1 .
En la siguiente parte, aprenderás a escribir en un archivo de texto.
Aprende a escribir en un archivo de texto con VB .NET — –;
Espero que te haya sido de ayuda!
