Question

在将文本文件读入Richtext框中时，我将不胜感激。我目前的代码附加了我想要的第一行文本，但其余的文本行不会改变。我需要一个循环来读取文件的末尾并在Richtext框中显示。我目前的代码是： -

Dim FILE_NAME As String = "C:\Test.txt"
Dim sr As New System.IO.StreamReader(FILE_NAME)
RichTextBox1.Text = sr.ReadToEnd

Dim sb As New System.Text.StringBuilder(RichTextBox1.Text)
sb.Insert(5, " ")
sb.Insert(12, " ")
sb.Insert(18, " ")
sb.Insert(25, " ")
sb.Insert(29, " ")
sb.Insert(32, " ")
sb.Insert(37, " ")
sb.Insert(44, " ")
sb.Insert(45, " ")

RichTextBox2.Text = sb.ToString

sr.Close()

Answer 1

我想你只想要RichTextBox1.LoadFile“C：/test.txt”

应该是文件名中的反斜杠，但我的键盘上没有这个版本

Answer 2

空格的原因是因为需要分隔具有相同长度字符和空格的每行文本，以使其更具可读性。原始文本如下所示： -

17915WHITE BLUE 001.900116A T123456111

72451BLACK ORANGE000.500208 B A123456123'最坏情况

72455BLACK WHITE 002.703501 C123456124

需要如下所示。

17915：白蓝：001.9：001：16：A：T：123456：111

72451：BLACK ORANGE：000.5：002：08：B：A：123456：123

72455：BLACK WHITE：002.7：035：01 :: C：123456：124

我可以为文本文件生成第一行，但我无法重现剩下的文本行，我想我需要一个循环来继续读取文本文件直到文件被读取。

在StringBuilder中创建一个循环来改变文本文件

2 个答案: