Разделение текста - VB

Формулировка задачи:

В общем, я более чем уверен, что это легко, но до меня до сих пор не дошло... Как разделить текст на строки? Пример: Имеем текст --- hafsgha yw3rghsa ywqwghaw 4qyawga --- И нужно отдельно получить каждую строчку. Да, знаю, что функцией Split можно, но не vbNewLine же подставлять в разделители

Решение задачи: «Разделение текста»

textual
                            Листинг программы 
                        

                                    Dim Full As String
        Full = "Prefix "
        TextBox1.Text = ""
        A = Split(RichTextBox1.Text, vbNewLine)
        For I = 0 To NumericUpDown1.Value - 1
            TextBox1.Text = TextBox1.Text + Full + A(I) + vbNewLine
        Next
 
        RichTextBox1.Text = TextBox1.Text
                        