Thanks guys, I figured it out now here is what I did. I am sure this isn't the best way but it will work great for what I need to do.

Dim strText = TextBox1.Text
        Dim arrLines = Split(strText, vbCrLf)
        Dim NE As Integer = 0


        For Each strLine In arrLines

            TextBox2.Text = (strLine)

            If ComboBox1.Text = strLine = True Then
                NE = 1
                Exit For
            End If

        Next


        If NE = 0 Then
            TextBox1.AppendText(TextBox2.Text + vbCrLf)
            ' do something
        Else
            ' do something
        End If

Thanks again for always helping me out.

I would like more information on how to loop through a textbox line for line.

This part is solved, thanks guys.

 Dim sStr As String
        Dim pos As Long

        sStr = TextBox1.Text

        pos = InStr(1, sStr, "X", vbTextCompare)

        TextBox2.Text = (pos)

returns the char position.

I will make a post on my next step