vb生成exe错误 - VB / 基础类

报这个错:
compile Error
sub or function not defined

和我引用这个库函数有关系吗？
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

---

建议 右键--- 切换 ----发生错误时中断 
 调试

---

错误出在什么地方?
代码页 前面加上 option explicit
按ctrl+F5

---

运行正常，生成exe时就报这个错
{{