Split使う
' 必要な変数を宣言する
Dim stCsvData As String = "5, Jitta, ABC"
' カンマ区切りで分割して配列に格納する
Dim stArrayData As String() = stCsvData.Split(","c)
' データを確認する
For Each stData As String In stArrayData
MessageBox.Show(stData)
Next stDataネタ元