Visual Basic - Como Ver un Archivo de Texto en un TextBox

Hola como estan Necesito ayuda para poder Visualizar un Archivo de texto Simple en un TextBox de un Formulario Espero me Puedan ayudar Gracias. Este es mi codigo pero no puedo comtrolas las Filas como ahogo

Private Sub cmdAbrir_Click()

Dim MiObjeto, MiRegistro, Midetalle
Dim MiTexto As String
Const ForReading = 1

Set MiObjeto = CreateObject("Scripting.FileSystemObject")
Set MiRegistro = MiObjeto.OpenTextFile("c:\MARKET\LISTADO.TXT", ForReading, False)
'Do While MiRegistro.AtEndOfLine <> True
Do While MiRegistro.AtEndOfStream <> True
Midetalle = MiRegistro.Read(1)
MiTexto = MiTexto & Midetalle
Loop

MiRegistro.Close

txtVista.Text = MiTexto

End Sub

Me imagino que enla caja de texto te deben de estar quedando los items uno al lado del otro, si es así, agrega vbcrlf para separar el texto
También la propiedad txtvista.Multiline = TRUE
MiTexto = MiTexto & vbcrlf & Midetalle que es lo mismo que :
MiTexto = MiTexto & Chr(13) & Chr(10) & Midetalle