实时错误 48 文件未找到 小白一个 怎么解决呀

Question

Private Declare Function compare Lib "SeetaFace2JNI.dll" (ByVal wilth As Integer, ByVal height As Integer) As Integer
'Private Declare Function compare Lib "c:/windows/system32/SeetaFace2JNI.dll" (ByVal wilth As Integer, ByVal height As Integer) As IntegerPrivate Sub Command3_Click()
Dim compareid As Integer
Dim a As Integer
a = 220
Dim b As Integer
a = 220
compareid = compare(a, b)
Text3.Text = compareid
End Sub

Answer 1

dll已经放到system32文件夹下 vb目录下也有一份  怎么也找不到文件是怎么回事

Answer 2

把dll注册一下

Answer 3

这年头，基本上用的都是64位的瘟系统了吧！
　如果是64位系统，你需要把那个dll放到 SysWOW64目录中。
　32位系统，才是放到 System32目录中。另外你放到“VB安装目录”中也没什么用，
　如果是“打开工程（尤其是双击vbp打开的工程）”，
　需要把dll放到“跟 vbp文件相同目录”（就是跟vbp文件放一块）中才有效。

Answer 4

SeetaFace2JNI.dll注册不成功  
显示已加载  但找不到入口点