Visual Basic - Leer un Archivo txt desde VB

Hola que tal como puedo leer desde Visual basic lo que esta en un archivo .txt o sea me explico mejor

en un archivo de texto tengo 3 lineas

en la primera tengo el nombre de la empresa
en la Segunda tengo el Rif de la empresa
en la primera tengo la Direccion de la empresa

solo quiero leer lo que est en la linea 1 y asignarselo a 1 variable
lo que esta e la linea 2 y asignarselo a otra variable
lo que esta e la linea 3 y asignarselo a la variable 3

Como se hace esto ????
Gracias de Antemano

Fijate con esto:

Dim Lineas As Variant , Nombre As String, RIF As String, Direccion As String

Lineas = Split(FileToString("MiArchivo.txt"),vbCrLF)

Nombre = Lineas(0)
RIF = Lineas(1)
Direccion = Lineas(2)

Public Function FileToString(FileName As String) As String
On Error GoTo ErrorHandler

Dim hlngFile As Long, strFile As String

hlngFile = FreeFile

Open FileName For Binary Access Read As hlngFile

FileToString = vbNullString

strFile = String(FileLen(FileName), " ")

Get hlngFile, , strFile

Close hlngFile

FileToString = strFile

Exit Function

ErrorHandler:
FileToString = Empty
End Function

Hola cecilia la verdad es que esa funcion no me resulto pero aqui tengo una solucion que si me funciono

Open App.Path & "\INI\Initial.ini" For Input As #1
If Not EOF(1) Then
Do Until EOF(1)
Line Input #1, linea
linea = linea
MsgBox (linea)
Loop
End If
Close #1, #2

y me los mostro muy bien
de Todas maneras Muchisimas gracias por ayudarme

La había probado y me funcionó sin problemas, ¿qué errores tiene?