[RESOLVED] [2005] RichTextbox.Lines problem Ignoring first line?

[Lerroy_Jenkins]

Private Sub DSAddUsersList()
        Dim EndProd As String
        Dim UserName As String
        Dim HomePath As String
        Dim NewLines As New List(Of String)
        Dim myquote As String = """"
 
        If Me.rtbMain.Lines.GetUpperBound(0) > 0 Then
            For Each line As String In Me.rtbMain.Lines
                UserName = line
                HomePath = tboHomePath.Text & "\" & UserName
 
                EndProd = "DSADD User " & myquote & "cn=test2,ou=Lerroystest" & myquote & ""
                NewLines.Add(EndProd)
            Next
            Me.rtbMain.Lines = NewLines.ToArray
        Else
            MsgBox("There is no data inside the textbox for you to manipulate!")
        End If
 
    End Sub

This basically (When the "EndProd =" is finished it will manipulate all sorts of text boxes etc I have already pre-populated.

But if I type something into the first line of the richtextbox and then press the button (which then calls this function).