me estava mirando otro codigo fuente...i me encontre esto...me gustaria usar ese codigo pero me falta hcer esto como lo hago?

Poner las siguientes declaraciones en un Modulo:

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

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

(NOTA: Las dos declaraciones deben estar en una misma Linea)