io ottengo questo risultato

test
test2

ma tutto in una variabile io voglio che si dividono in 2 variabili

codice:
s = System.Text.Encoding.ASCII.GetString(res)
                Dim words As String() = s.Split(New Char() {","c})
                Dim word As String
                For Each word In words
                    Console.WriteLine(word)

                Next
                downloadgo(filename, link)
e poi manda a downloadgo le 2 variabili