Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, _

    ByVal e As System.EventArgs) Handles Button1.Click



        Dim str As String

        Dim strArr() As String

        Dim count As Integer

        str = "vb.net split test"

        strArr = str.Split(" ")

        For count = 0 To strArr.Length - 1

            MsgBox(strArr(count))

        Next



    End Sub

End Class