Visual Basic - por k alguien me expliqeu estto

por fa... quisiera k alguien me enseñe un poko de esto:

Hay un archivo .INI con el nombre de routers y contiene esto:
[Routes]
sUnitBdf=C:\Sistema ADEMIFE\Data\BDAlmacen.mdb
sUnitImage=C:\Sistema ADEMIFE\Icon\
sMessages=FERRETERIA ADEMIFE
--->Se supone k esos son variables y contiene la ruta donde se encuentra la Base de Datos,la ruta donde se encuentran las imagenes y la ultima variable k se supone contiene un titulo.

Ahora lo k quiero saber es :
como hago para extraer el valor de esas variables , que se encuentran en ese archivo .INI
como puedo programar utilizando esas variables

---------------------------------------------
Bueno epsro alguien me ayude... por fa.... no soy tan experta y quisiera k me ayuden... besos nenes

Tienes que usar las APIs
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Por ejemplo para leer el valor de una variable puedes usar:
Public Function ReadString(Seccion As String, Variable As String, File As String) As String

Dim Valor As String * 255
Dim resp As Long

resp = GetPrivateProfileString(Seccion, Variable, "", Valor, 255, File)
ReadString = Left(Valor, resp)

End Function
y para escribir:
Public Function WriteString(Seccion As String, Variable As String, File As String, Valor As String)

WritePrivateProfileString Seccion, Variable, Valor, File

End Function

Por fa un pregunta .....

yo llamo asi a la funcion desde el formulario
Text1.Text = Module1.ReadString( ? , "Igv", App.Path + "\Programa para leer variables de archivo INI/inical.ini")

Por fa no entiendo k va en "seccion"

'''''modulo k me enviaste
Public Function ReadString(Seccion As String, Variable As String, File As String) As String

Dim Valor As String * 255
Dim resp As Long

resp = GetPrivateProfileString(Seccion, Variable, "", Valor, 255, File)
ReadString = Left(Valor, resp)

End Function

Un fichero ini tiene lasiguiente estructura

[VARDESECCION1]
var1=20
mensaje=Hola

[Variables de SECCION2]
nombre= jose
apellidos=Sanchez del Solar

como ves aqui hay dos secciones "VARDESECCION1" y "Variables de SECCION2" y dentro da cada una tienes un grupo de variables.