Hola por que no intentas con esto depronto te sirva lo que hace es recorrer el texto caracter por caracter y verifica si es un enter yo lo hice y me funcion
Código:
For i AsInteger = 0 ToMe.TextBox1.Text.Length - 1
IfMe.TextBox1.Text.Substring(i, 1) = Chr(13) Then
MsgBox("Hay un enter")
EndIf
Next