12/10/2011, 05:03
|
| | | Fecha de Ingreso: abril-2010
Mensajes: 82
Antigüedad: 14 años Puntos: 2 | |
| Respuesta: Contar lineas de un archivo txt
dale te paso codigo
Using Lector As New StreamReader(RUTA_MENSAJES & "\" & MensajeSeleccionado & ".dmm")
Linea = Lector.ReadLine
While (Not Linea Is Nothing)
CantidadLineas += 1
ReDim NuevoMensaje(CantidadLineas)
NuevoMensaje(Indice) = Linea
Indice += 1
Linea = Lector.ReadLine
End While
End Using
Asi es como leo el archivo y voy contando la cantidad de lineas que tiene al mismo tiempo que guardo todo en un vector. No se me ocurre como hacerlo mas rapido.....
Gracias por la ayuda |