How do I insert items into a listview control from textbox

See more:

VB

I have a listview with two columns. I also have a textbox. In the textbox, there are lines with strings that I want to insert into the listview.
Every 1st line will be inserted into the first column and every 2nd line will be inserted into the second column. How would I achieve this.
This is my current code:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox3.Text = My.Resources.clsid
        Dim ListArr(230) As String
        Dim i As Integer = 0
        For Each line As String In TextBox3.Lines
            ListArr(i) = line(i)
            i += 1
            For Each litem As String In ListArr
                AddLitem(litem, litem)
            Next
        Next
    End Sub
    Public Function AddLitem(ByVal Desc As String, ByVal CLSID As String)
        Dim litem As ListViewItem
        If i = 0 Then
            Lstr(0) = Desc
            i += 1
        ElseIf i = 1 Then
            Lstr(1) = Desc
            litem = New ListViewItem(Lstr)
            ListView1.Items.Add(litem)
            ListView1.Items.RemoveAt(ListView1.Items.Count)
        End If
        Lstr(0) = Desc
        'Lstr(1) = CLSID
    End Function

Please help me.
Thanks in advance.