Extract Each Lines From Text Box VB.NET Source Code

Extract Each Lines From Text Box VB.NET Source Code

Source Code

Button 1 Click Event

 Dim loi As Integer = 1

        For Each strLine As String In TextBox1.Text.Split(vbNewLine)

            If loi = 1 Then

                MsgBox(strLine)

                loi = 0

            Else

                MsgBox(strLine.Remove(0, 1))

            End If

        Next

    End Sub

If Condition Used For Avoid Extra New Lines..