调用WinIO32.dll时出错:找不到入口点.

Question

模块:Public Declare Function InitializeWinIo32 Lib "WinIo32.dll" () As Boolean
Form:Private Sub Command1_Click()
If InitializeWinIo32 = False Then
    MsgBox "Whoops ! There is a problem with InitializeWinIo.", vbOKOnly + vbCritical, "VBDumpPort32"
End If
End Sub
点击button后就弹出:
找不到DLL入口点InitializeWinIo32 in winio32.dll.
WinIo32.dll和WinIo32.sys都放在当前目录下的. 请问是什么原因呢?

Answer 1

Public Declare Function InitializeWinIo32 Lib App.Path & "\WinIo32.dll" () As Boolean

Answer 2

'看看这个行不行
Declare Function InitializeWinIo Lib "WinIo.dll" () As BooleanDeclare Function InstallWinIoDriver Lib "WinIo.dll" (ByVal DriverPath As String, ByVal Mode As Integer) As Boolean
Declare Function RemoveWinIoDriver Lib "WinIo.dll" () As Boolean

Answer 3

Public Declare Function InitializeWinIo Lib "WinIo32.dll" () As Boolean

Answer 4

把WinIO32.sys和WinIO32.dll中的32去掉就好了