Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        'separadores(TextBox1.Text)
        Dim texto As String
        texto = TextBox1.Text
        Dim i As Integer = 0


        ' For i = 0 To texto.Length
        texto.Replace(",", "")
        texto.Replace(".", "")
        texto.Replace(";", "")
        'MessageBox.Show(texto(i))


        'Next
        'For i = 0 To array.GetUpperBound(0)
        Dim array() = Split(texto, " ")
        'Next

        'For i = 0 To array.GetUpperBound(0)
        '    MessageBox.Show(array(i))
        'Next
        TextBox2.Text = texto
    End Sub

Dim texto() As String = Split(TextBox1.Text, " ")
        Dim i As Integer
        For i = 0 To UBound(texto)
            MessageBox.Show(texto(i))
        Next
   

Dim separador() As Char = {" ", ",", "."}
        Dim texto() As String = Split(TextBox1.Text, separador)
        Dim i As Integer
        For i = 0 To UBound(texto)
            MessageBox.Show(texto(i))
        Next