VB.NET 一个RichTextBox显示多路径下不同文件的内容，举例并详细说明

假设我们有以下文件结构：

- MainFolder
  - Folder1
    - file1.txt
  - Folder2
    - file2.txt
    - file3.txt

现在我们想要在一个RichTextBox中显示所有文件的内容。我们可以使用VB.NET的Directory类来获取每个文件的路径，然后使用FileStream和StreamReader类来读取它们的内容。以下是一个示例：

Dim folderPath As String = "C:\MainFolder"
Dim fileNames() As String = Directory.GetFiles(folderPath, "*.txt", SearchOption.AllDirectories)
Dim content As String = String.Empty

For Each fileName As String In fileNames
    Using stream As New FileStream(fileName, FileMode.Open)
        Using reader As New StreamReader(stream)
            content &= reader.ReadToEnd()
        End Using
    End Using
Next

RichTextBox1.Text = content

在此示例中，我们首先定义了要搜索的文件夹路径。然后，我们使用Directory类的GetFiles方法获取所有.txt文件的路径，包括子文件夹中的文件。接下来，我们遍历每个文件的路径并使用FileStream和StreamReader类读取其内容。最后，我们将所有文件的内容添加到一个字符串中，并将其设置为RichTextBox的Text属性，以便在控件中显示。

注意：在使用Directory类的GetFiles方法时，我们可以通过第三个参数SearchOption来指定搜索选项。在此示例中，我们设置了SearchOption.AllDirectories选项，以便搜索子文件夹中的文件。