VB.NET 讀取文字檔，並依分隔符號將每個欄位值放入陣列

JDP

一次讀取
Dim szAllFileData As String<br /> Dim arr() As String<br /> szAllFileData = My.Computer.FileSystem.ReadAllText("a.txt")<br /> arr = szAllFileData.Split(",".ToCharArray())<br /> Dim i As Object<br /> For Each i In arr<br />     RichTextBox1.Text += i + " "<br /> Next i
如果是分行讀取.. 那就改用SteamReader的方式讀
Dim fs As New FileStream(檔案路徑, FileMode.Open, FileAccess.Read)<br /> Dim sr As New StreamReader(檔案路徑, System.Text.Encoding.GetEncoding("BIG5"))<br /> Dim strLine As String<br />    Do<br />         strLine = sr.ReadLine<br />         txtContent.Text = txtContent.Text + strLine<br />    Loop Until strLine Is Nothing