Visual Basic - COMO VALIDAD ENTER AL FINAL DE UN TXT

Life is soft - evento anual de software empresarial
 
Vista:

COMO VALIDAD ENTER AL FINAL DE UN TXT

Publicado por Norberto (5 intervenciones) el 02/07/2001 21:07:35
Hola a todos:

Leo un archivo de texto, pero quisiera validar si al final hay un Enter (una linea en blanco final). Alguien puede decirme como???

De antemano, gracias, y saludos a todos

Norberto

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:COMO VALIDAD ENTER AL FINAL DE UN TXT

Publicado por kikonmx (33 intervenciones) el 03/07/2001 02:43:28
Lo único que tienes que hacer es verificar si el último caracter leído del archivo es chr( 13 )
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:COMO VALIDAD ENTER AL FINAL DE UN TXT

Publicado por Julian Sanchez (2 intervenciones) el 03/07/2001 15:10:10
Eso no verifica una línea en blanco al final.
¿Cual es exactamente el control que necesitas?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

JULIAN SANCHEZ, ESTO ES LO QUE NECESITO

Publicado por Norberto (16 intervenciones) el 04/07/2001 16:03:09
Antes que nada, gracias por molestarte:
Lo que sucede es lo siguiente, abro el archivo de texto, por ejemplo:
Open C:\PRUEBA.TXT For Input As #1
Luego voy leyendo linea por linea:
Do Until EOF(1)
Line Input #1, LineaDeTexto$
Loop

Pero aqui siento que me lee una linea sin considerar el ENTER, es decir, si mido la longitud (con Len), me devuelve exactamente el numero de caracteres que existen (yo esperaría uno mas, por el Enter).
Ahora, si hasta el final hay una linea en blanco (que es la la que quiero detectar) al terminar de leer todas las lineas esta no me la devuelve(sería de longitud 0), pero si a proposito le doy una mas, esta penultima si me la detecta.
Si puedes ayudarme, te lo agradecería.
Recibe saludos y nuevamente gracias.
Norberto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar