Visual Basic - Abrir txt

Mi problema es que necesito abrir un archivo de texto para mostrar su contenido en un richtextbox para posteriormente leer el contenido utilizando el ms agent,nada mas requiero saber como abrir el archivo y mostrar su contenido.
de antemano mil gracias.....

Puedes usar esta

dim fso As Scripting.FileSystemObject

Set fso = New Scripting.FileSystemObject
Set f = fso.OpenTextFile(strRutaArchivo, ForReading, True)

While Not f.AtEndOfStream
r = f.ReadLine()
'aca r contiene la linea del archivo txt
Wend

f.Close

Set fso = Nothing