怎样用VB程序调用带参数的VC程序的DLL函数？

[tangliang01]

本人的程序如下

WIN32动态连接库：
// test.cpp : Defines the entry point for the DLL application.
//

#include "StdAfx.h"
#include <stdio.h>
#include "test.h"
void succode(double *Source1,char *Source2);

BOOL APIENTRY DllMain( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
return TRUE;
}

EXPORT BOOL CALLBACK test(double Source1[],char *Source2)
{
succode(Source1,Source2);
return TRUE;
}

void succode(double *Source1,char *Source2)
{
int i;
for(i=0;i<6;i++)
printf("%20.12f",Source1[i]);
for(i=0;i<6;i++)
printf("%20.12f",Source2[i]);
}


//test.h

#define EXPORT extern "C" __declspec(dllexport)

EXPORT BOOL CALLBACK test(double Source[],char *Source2);



VB程序：

Private Declare Function test Lib "F:\Debug\test.dll" (ByRef Source1() As Double, ByRef Source2 As String) As Boolean
Private Sub Command1_Click()
Dim want(1 To 6) As Double, strWant As String

want(1) = 1: want(2) = 2: want(3) = 3: want(4) = 4: want(5) = 5: want(6) = 6:
strWant = "Basic"
If test(want, strWant) = True Then
End
Else
RT = MsgBox("Dll函数错误", vbOKOnly)
End
End If
End Sub

调试VB出现如下错误

实时错误 '453'

找不到DLL入口点 test in F:\Debug\test.dll

请教各位问题在那里

[sys0004]

用depends查看下你的DLL是否有导出的test函数。

http://www.dependencywalker.com/depends22_x86.zip

[Sandrer]

__declspec(dllexport)

用这个关键字来定义输出函数，它会把函数名更改掉滴~

你用__stdcall来定义输出函数
然后创建一个*.def文件用作输入

[palmax]

c++导出时加上 extern "C"

[tangliang01]

test.h里不是加了#define EXPORT extern "C" __declspec(dllexport)