vb6 - 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

看起来您还没有声明FILETIMEUDT。

在 VB6 中，它被声明为：

Type FILETIME
  dwLowDateTime As Long
  dwHighDateTime As Long
End Type