Visual Basic - lectura multiline

Tengo un pequeño problemilla con un texto con el multiline activado.

El texto es algo parecido a esto

17G0060 --- 28,015=8
15M0120 --- 30,161=5
15M0125 --- 40,305=5

Mediante el siguiente codigo consigo la parte entre --- y =

n = InStr(1, Text1, "---")
o = Len(Text1) - n
Label2.Caption = Right(Text1, Len(Text1) - (Len(Text1) - o - 3))
n = InStr(1, Text1, "=")
o = Len(Label2) - n
Label2.Caption = Left(Text1, Len(Label2) - (Len(Label2) - o))

pero como puedo aislar la parte posterior a = y la anterior a ---??

Gracias

Ya esta!! Ya tengo la respuesta.

Para llegar al final de linia basta poner en InStr(1, Text1, "vbCrLf") (Buscar en el text1 un salto de linia)