hola david:
gracias por la ayuda anterior.
cuando ejecuto mi programa me aparece un msgbox que dice: "tu nombre es:", pero sigue sin ponerme el nombre.
este es mi codigo:
Module Module1
Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Sub Main()
Dim I As Long
Dim Est As String
Est = Space(50)
I = GetPrivateProfileString("Ejemplo", "Nombre", "", Est, Len(Est), "C:\Apl.ini")
If I > 0 Then
MsgBox("Tu Nombre es: " & Est)
End If
End Sub
End Module
y este es fi fichero .ini:
[Ejemplo]
Nombre = jose
gracias.
un saludo.