“用户定义的类型未定义”VB6 API声明中的编译错误

Question

为什么在尝试编译以下API声明时会出现“未定义的用户定义类型”错误？

Public Declare Function RegQueryInfoKey Lib "advapi32.dll" Alias _
  "RegQueryInfoKeyA" (ByVal hKey As Long, ByVal lpClass As String, _
  ByRef lpcbClass As Long, ByRef lpReserved As Long, ByRef lpcSubKeys As Long, _
  ByRef lpcbMaxSubKeyLen As Long, ByRef lpcbMaxClassLen As Long, _
  ByRef lpcValues As Long, ByRef lpcbMaxValueNameLen As Long, _
  ByRef lpcbMaxValueLen As Long, ByRef lpcbSecurityDescriptor As Long, _
  ByRef lpftLastWriteTime As FILETIME) As Long

Answer 1

看起来您尚未声明FILETIME UDT。

在VB6中，它被声明为：

Type FILETIME
  dwLowDateTime As Long
  dwHighDateTime As Long
End Type