將字串分割，並產生字串陣列

參考來源

--

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

' === 字串切割 ===

Dim MyString = "09/02/04 4:00p 21.9 21.9 21.8 69 15.9 3.6 NE 2.15 6.3　"

Dim charSeparators() As Char = {" "c}

Dim strResult() = MyString.Trim().Split(charSeparators, StringSplitOptions.RemoveEmptyEntries)



' === 顯示 ===

For i As Integer = 0 To strResult.Length - 1

Me.TextBox1.Text += strResult(i) + Environment.NewLine

Next

End Sub

End Class