How to read multiple text files in a richtextbox

Question

0.00/5 (No votes)

See more:

I tried to reuse some code I had from another project that involved images. However, images and text differ on how they are accessed.

Here is my code so far:

Dim Files As New OpenFileDialog
       Files.Filter = "text(*.TXT files|*.txt"
       ' Allow the user to select multiple images.
       Files.Multiselect = True
       Files.Title = "Select an image"
       Files.ShowDialog()

       Dim fileCount = Files.FileNames.Length
       Dim text(fileCount - 1) As New StreamReader

       For i As Integer = 0 To fileCount - 1


           Text(i) = Text.FromFile(Files.FileNames(i))

           'Gets all filenames selected as a string
           ' Dim Imagename As String = Path.GetFileNameWithoutExtension(Files.FileNames(i))
           Dim textpath As String = Path.GetFullPath(Files.FileNames(i))

           Me.RichTextBox1.LoadFile(textpath, RichTextBoxStreamType.PlainText)

the issue I am having is that it only read one file. also, the

Text(i) = Text.FromFile(Files.FileNames(i))

I do not know how to convert this into something usuable for text?

What I have tried:

I have tried to remove the

Text(i) = Text.FromFile(Files.FileNames(i))

entirely, but that didnt give the result I was looking for.

Posted 14-Feb-18 8:33am

Member 11856456

Updated 15-Feb-18 7:59am

Add a Solution

Comments

Maciej Los 14-Feb-18 15:02pm

How many textboxes are there?

2 solutions

Solution 1

Member 11856456[^] wrote:
How to read multiple text files in a richtextbox

Well, using RichTextBox.LoadFile Method (String, RichTextBoxStreamType) (System.Windows.Forms)[^] you can't! See MSDN documentation:

Quote:

Remarks
When loading a file with the LoadFile method, the contents of the file being loaded replace the entire contents of the RichTextBox control. This will cause the values of the Text and Rtf properties to change. You can use this method to load a previously created text or rich text format (RTF) document into the control for manipulation. If you want to save the file, you can use the SaveFile method.

Conclusion: you have to provide custom logic to add content of another file. You can use TextBoxBase.Lines Property (System.Windows.Forms)[^].

As to this piece of code: Text(i) = Text.FromFile(Files.FileNames(i)) i can say nothing... Well... it might be a collection of TextBox'es under common name.

Posted 14-Feb-18 9:16am

Maciej Los

Comments

Member 11856456 14-Feb-18 23:02pm

I appreciate the feedback, still trying to get the Richtextbox to hold the text information from multiple text files.

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard Deeming · Accepted Answer · 2018-02-15T07:14:00

Solution 2

At a guess, something like this should work:

VB.NET

Dim fileCount = Files.FileNames.Length
Dim text(fileCount - 1) As String

For i As Integer = 0 To fileCount - 1
    Dim textpath As String = System.IO.Path.GetFullPath(Files.FileNames(i))
    Text(i) = System.IO.File.ReadAllText(textpath)
Next

Me.RichTextBox1.Text = String.Join(Environment.NewLine, Text)

Posted 15-Feb-18 7:14am

Richard Deeming

Updated 15-Feb-18 7:15am

v2

Comments

Member 11856456 15-Feb-18 13:31pm

Awesome, I appreciate it. This is exactly what I needed.