找不到dll入口点(在线等)
UJin 2003-12-22 03:45:43 我自己写了个dll文件,工程是DllNew.vbp,类模块是Main.cls,源文件如下,
Public Function InputStr(ByVal iString As String) As String
InputStr = iString & vbCrLf & "It's OK"
End Function
编译后生成DllNew.dll文件,放到system32下。
在新程序中声明调用,源程序如下,
Private Declare Function InputStr Lib "DllNew" (ByVal iString As String) As String
Private Sub Command1_Click()
Dim a As String
a = "kkk"
a = InputStr(a)
MsgBox a
End Sub
运行提示:
实时错误 ’354’
找不到DLL入口点 InputStr in DllNew
是dll文件有问题,还是调用声明有问题?