ReadToEnd line breaks

[dscreation]

I am trying to read from a .txt but when it reads, all of the lines are in a single string. all I want it to do is add a break after each line. Here is the code I am using right now...

If System.IO.File.Exists("CartP.txt") Then
viewProduct = System.IO.File.OpenText("CartP.txt")
cartProduct = viewProduct.ReadToEnd()
lblProduct.Text = cartProduct
viewProduct.Close()
Else
lblProduct.Text = "There are no items in your cart."
End If

I have tried to do a ReadLine but I don't know what to do because the txt can have any given number of lines.

Thanks for you help,
You local friendly newb

[TRScheel]

I am trying to read from a .txt but when it reads, all of the lines are in a single string. all I want it to do is add a break after each line. Here is the code I am using right now...

If System.IO.File.Exists("CartP.txt") Then
viewProduct = System.IO.File.OpenText("CartP.txt")
cartProduct = viewProduct.ReadToEnd()
lblProduct.Text = cartProduct
viewProduct.Close()
Else
lblProduct.Text = "There are no items in your cart."
End If

I have tried to do a ReadLine but I don't know what to do because the txt can have any given number of lines.

Thanks for you help,
You local friendly newb

Try this...

Dim SReader As System.IO.StreamReader = New System.IO.StreamReader(location)
 
        While Not (SReader.EndOfStream = True)
            SReader.ReadLine()
        End While

[dscreation]

Try this...

Dim SReader As System.IO.StreamReader = New System.IO.StreamReader(location)
 
        While Not (SReader.EndOfStream = True)
            SReader.ReadLine()
        End While

I can see that works, how can I display the read on a lable?

[TRScheel]

I can see that works, how can I display the read on a lable?

Doing this will give you a string with the contents of the file.

Dim SReader As System.IO.StreamReader = New System.IO.StreamReader(location)
Dim MyString as String = String.Empty
While Not (SReader.EndOfStream = True)
     MyString = MyString + SReader.ReadLine()
End While
 

You could then do something like

MyLabel.Text = MyString

[Killer42]

You might need to insert linebreaks between lines.

[TRScheel]

You might need to insert linebreaks between lines.

true, so do something like

mystring = SReader.ReadLine() + Environment.NewLine