Visual Basic - Leer textBox Multiline

Amigos del foro:
Quería consultarles respecto al un código del tipo do while para recorrer un textbox multiline a los efectos tomar cada datos y poder procesarlo dato a dato.
Desde ya muchas gracias.

Marcelo Cardozo

Fijate con la función Split:

Dim astrLineas As Variant, i As Long

astrLineas = Split(Text1.Text, vbCrLf)

For i = LBound(astrLineas) To UBound(astrLineas)
Debug.Print i & ":" & astrLineas(i)
Next i