作者whalekiller (失业~)
看板Visual_Basic
标题[VBA ] VBA呼叫BCB产生的DLL
时间Tue Nov 4 22:25:41 2008
Hi,各位高手
请问VBA如何呼叫BCB产生的DLL
我的BCB写法如下
#include <windows.h>
#pragma argsused
BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fwdreason, LPvoid lpvReserved)
{
return 1;
}
//-
long __declspec(dllexport) __stdcall aaa(int m,int n)
{
long sum=0;
for(int m;m<=n;m++)
sum+=m;
return sum;
}
而VBA的写法如下
private Declare function aaa Lib "aaa.DLL" _
(ByVal m as Integer, ByVal n as Integer) as long
private Sub CommandButton1_Click()
MsgBox aaa(1, 10)
End Sub
错误讯息如下:
"DLL进入点aaa无法在aaa.DLL中找到"
谢谢各位罗!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.230.4.33
1F:推 Marty:我遇过同样的错误讯息..原因是该DLL本身并不是标准格式.. 11/08 08:23
2F:→ Marty:建议你可以用BCB的公用程式(如果有的话)检查一下该DLL.. 11/08 08:24