Auslesen einer Textdatei

[Shore]

Hallo,
ich bin VB Neuling und schreibe derzeit mein erstes Programm für meinen Blog => man soll darüber Bloggen können.

Soweit hab ich alles schon zusammen. Ich hatte vor, eine Textdatei zu erstellen (klappt bereits wunderbar). Da ich jetzt nicht wieder alles umschreiben will, will ich die Textdatei wieder einlesen und zwar in einem unsichtbaren Textfeld. Klappt auch, nur leider werden meine Zeilenumbrüche nicht beachtet.
Ich habe das hier verwendet, um die Textdatei einzulesen.

Danke

[gfoidl]

Hallo Shore,

warum willst du die Textdatei in ein Textfeld einlesen? Wenn Inhalte aus der Textdatei benötigt werden lies diese mit einem StreamReader ein.

mfG Gü

[Shore]

Hallo,

ja, es soll in ein Textfile eingelesen werden.

   Public Sub lesen()
        Dim objStreamReader As StreamReader
        Dim strLine As String

        'Pass the file path and the file name to the StreamReader constructor.
        objStreamReader = New StreamReader("C:\blog.txt")

        'Read the first line of text.
        strLine = objStreamReader.ReadLine

        'Continue to read until you reach the end of the file.
        Do While Not strLine Is Nothing

            'Write the line to the Console window.
            Console.WriteLine(strLine)
            boxMessageBuffer.Text += boxMessageBuffer.Text

            'Read the next line.
            strLine = objStreamReader.ReadLine
        Loop

        'Close the file.
        Console.ReadLine()

So siehts bisher aus. Wie gesagt, es überspringt einfach meinen Umbruch. Irgendwelche Lösungsbeispiele?

Danke

[gfoidl]

Hallo,

deine Umbrüche werden deshalb nicht beachtet weil beim Einlesen nur der Text eingelesen wird (ohne CR-LF). In deinem Code wird dann der Text mit dem selben Text verkettet?!

Ändere den Code zu:

boxMessageBuffer.Text += vbCrLf + strLine

mfG Gü

[Shore]

Funktionier wunderbar.

Danke