CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Creacion Y Lectura

(1/2) > >>

The Black Boy:
Hola Amigos estoy creando una aplicacion que me crea archivos planos
por ejemplo esto... No tiene  ningun problema y crea el archivo

--- Código: Text --- Public Sub crear()        Try            Dim strescritor As StreamWriter            Dim strruta As String = ("D:\cortesuprema.txt")            strescritor = New StreamWriter(strruta)            strescritor.WriteLine(Me.RichTextBox1.Text)            strescritor.Close()            MsgBox("OK")        Catch ex As Exception            MsgBox("FALLO CREACIÒN DE ARCHIVO")        End TryEnd Sub  
pero cuando lo voy a leer


--- Código: Text --- Public Sub leer_archivo()        Dim strruta As String = ("D:\cortesuprema.txt")        Me.RichTextBox1.Refresh()        Me.RichTextBox1.Multiline = True        Try            Dim strreader As New StreamReader(strruta)            Dim linea As String            Dim contador As Integer = 1            linea = strreader.ReadLine            Do While Not (linea Is Nothing)                Me.RichTextBox1.Text += linea & " "                contador += 1                linea = strreader.ReadLine            Loop        Catch ex As Exception            MsgBox("FALLÒ LECTURA DE ARCHIVO", MsgBoxStyle.Critical)        End Try    End Sub  
me lo trae pero no con los saltos de linea sino todo pegado me explico;
si yo por ejemplo ingrese de esta manera


--- Citar ---primera linea
segunda linea
tercera linea

--- Fin de la cita ---

lo que me trae es:

--- Citar ---primera lineasegunda lineatercera linea

--- Fin de la cita ---

y no se por que :unsure:

agradezco cualquier colaboracion

Gracias y Saludos :hola:

Kev:
Hola, bueno mira tu codigo y al momento de leer lo que estas haciendo es leer linea por linea, entonces el delimitador en tu bucle es el salto de carro, cuando ya no haya un salto de carro y contenido entonces saldra del bucle.

Por este motivo tu estas concatenando la las lineas porque el salto de carro es el delimitador y no se muestra. Ahora tambien para solucionar esto pordrias intentar usar el metodo ReadToEnd

Salu2
 :comp:

The Black Boy:
gracias Kev , voy a probar y luego te comento como me fue   :comp:


 :hola:

The Black Boy:
gracias Kev funcionó perfectamente... ;)

Pregunta

yo estoy mostrando el texto en un richtextbox ¿hay alguna forma de mostrar la informacion y que esta herede el formato del texto?

por ejemplo si hay texto en negrita que al leerlo se muestre etc...


Gracias una ves mas y saludos

senzao18:
Pues en un archivo de Texto Plano no podras guardar formatos.... Puesto que no lo permite el tipo de archivo que estas manejando.....

Navegación

[0] Índice de Mensajes

[#] Página Siguiente