Extraer datos de líneas de ficheros
Publicado por Bakero (2 intervenciones) el 15/01/2010 12:02:01
Hola a todos
Tengo un fichero de datos con una serie de líneas que guardan valores numéricos separados por ';' (ej: 1234;83665;278362;348776663)
Me gustaría hacerme una rutina que me leyese esas líneas y me almacenase de forma separada los pares y los impares de cada línea.
Os pongo aquí de forma resumida lo que hago:
Dim sr As New System.IO.StreamReader("C:\test.txt", System.Text.Encoding.Default, True)
Do
sLine = sr.ReadLine()
If Not sLine Is Nothing Then
arrText.Add(sLine)'Los datos vienen separados por ';'
End IfLoop Until sLine Is Nothing
El caso es que lo que quiero es leer los valores separados por ese ';' que os he comentado, y no se muy bien cómo hacerlo.
he intentado el comando sLine=sr.ReadLine.Split(Chr(59)) pero me da error.
Otra prueba que he hecho ha sido: arrText.Add(sLine.Split(Chr(59)))
pero he obtenido el mismo resultado negativo.
¿Podrían echarme una mano para encontrar qué me falla?
Gracias de antemano y un saludo
Tengo un fichero de datos con una serie de líneas que guardan valores numéricos separados por ';' (ej: 1234;83665;278362;348776663)
Me gustaría hacerme una rutina que me leyese esas líneas y me almacenase de forma separada los pares y los impares de cada línea.
Os pongo aquí de forma resumida lo que hago:
Dim sr As New System.IO.StreamReader("C:\test.txt", System.Text.Encoding.Default, True)
Do
sLine = sr.ReadLine()
If Not sLine Is Nothing Then
arrText.Add(sLine)'Los datos vienen separados por ';'
End IfLoop Until sLine Is Nothing
El caso es que lo que quiero es leer los valores separados por ese ';' que os he comentado, y no se muy bien cómo hacerlo.
he intentado el comando sLine=sr.ReadLine.Split(Chr(59)) pero me da error.
Otra prueba que he hecho ha sido: arrText.Add(sLine.Split(Chr(59)))
pero he obtenido el mismo resultado negativo.
¿Podrían echarme una mano para encontrar qué me falla?
Gracias de antemano y un saludo
Valora esta pregunta
0