codice:
For si As Integer = 0 To UBound(Info)
                Application.DoEvents()
                sx = Info(si) & " " & vbCrLf 'Chr(13)
                '    MsgBox(Info(si))
                If si <= 1 Then
                    Dim litem As New ListViewItem
                    litem = ListView1.Items.Add(Info(0).ToString)
                    litem.SubItems.Add(Info(1).ToString)
                Else
                    Dim litem As New ListViewItem
                    litem = ListView1.Items.Add(Info(0).ToString & " " & Info(1).ToString)
                    litem.SubItems.Add(Info(2).ToString)

                End If
            Next
nel caso tu abbia 3 nomi, il for fa 3 giri, nei primi 2 con si = 0 e si = 1 inserisci sempre info(0) e info(1) come subitem.. quindi inserisci 2 volte lo stesso elemento

ps: la funzione split funziona a dovere controlla meglio..