vb使用GetPrivateProfileString函数时提醒子程序或函数未定义

vb使用GetPrivateProfileString函数时提示子程序或函数未定义
为什么啊
------解决方案--------------------
没定义就定义：

Private 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