VB.NET循环取值StringBuilder，获取总行数，StringBuilder转换为String

在读取文件的时候直接把里面的内容读到StringBuilder里面，在里面处理好了，在循环取出来用。这个是我用到一个例子。

我是经过用户在RichTextBox1里面修改好后，在把内容发给StringBuilder进行处理，处理后就是我们想要的数据。作为新手来说，用StringBuilder处理后，还要取出来是个麻烦了。在网上搜索了很多，都没找到现成的。还是自己来盘代码吧

举例子

先建立一个处理添加到StringBuilder函数

Function Fn_3BTXT()

Dim tmp As New StringBuilder

tmp.Append( "伙计百科1,伙计百科2,伙计百科3" & vbCrLf )'添加数据并换行

tmp.Append( "伙计百科a,伙计百科b,伙计百科c" & vbCrLf )

Return tmp

End Function

复制

读取 StringBuilder里面的数据内容

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

Dim mm As StringBuilder = Fn_3BTXT()

Dim ss（） As String

ss = Split(mm.ToString, Chr(13) + Chr(10))  ' 把这StringBuilder转为字符串，mm.ToString

For i = 0 To Regex.Matches(mm.ToString(), Environment.NewLine).Count - 1 '取得StringBuilder里的总行数

MsgBox(ss（i））'循环按行显示内容，如果是每行的内容还要分割，直接在里面分割即可

Next

End Sub

复制