Sicuramente non hai modificato correttamente quello che ti era stato suggerito ...
In tutti i casi, il codice corretto è il seguente
senza textbox nè altro ... vedi un po' dove sbagliavi ...codice:Dim testosplittato As String = TextBox1.Text Dim testo As String() = testosplittato.Split(" ") Dim lv As ListViewItem = Nothing TextBox2.Text = "" For Each parola As String In testo TextBox2.Text &= parola & Space(1) If lv Is Nothing Then lv = ListView1.Items.Add(parola) Else lv.SubItems.Add(parola) End If Next