Question

我正在尝试使用此代码将文本文件加载到richtextbox

 RichTextBox1.Text = My.Computer.FileSystem.ReadAllText("path")
 RichTextBox1.LoadFile("path", RichTextBoxStreamType.PlainText)

但是它们都需要时间来加载文件，文件大小约为400-1MB 那么如何更快地加载呢？

并在加载文本文件后使用我的代码我使用此代码

RichTextBox1.Text = Replace(RichTextBox1.Text, "text", "othertext")

但问题是这需要很多时间!! 如何快速完成并节省时间:)，谢谢！

Answer 1

你可以通过在Replace函数中使用普通的字符串变量而不是RichTextBox1.Text将时间减少一半：

s = My.Computer.FileSystem.ReadAllText("path")
s = s.Replace("text", "othertext")
RichTextBox1.Text = s

您可以将它们组合成一个或两个语句，但将它们分开可以让您为每个操作计时。耗时的部分是访问RichTextBox控件。

Answer 2

您可以尝试逐行阅读：

Using Reader As New IO.StreamReader("<File Path>")
    Do Until Reader.EndOfStream
        Dim Line As String = Reader.ReadLine()
        Line = Replace(Line, "text", "othertext")
        RichTextBox1.AppendText(Line & Environment.NewLine)
    Loop
End Using

快速替换richtextbox中的文本

2 个答案: