VB调用VC编写的动态连结库！！！！！！！！！

Question

VC写的DLL：#include "stdafx.h"extern "C" _declspec(dllexport) char * printfn(char *str)
{
str = "hello!\n";
return str;
}BOOL APIENTRY DllMain( HANDLE hModule, 
                       DWORD  ul_reason_for_call, 
                       LPVOID lpReserved
 )
{
    return TRUE;
}VB点击按钮调用DLL:Private Declare Function printfn Lib "TestDLL" (ByVal str As String) As StringPrivate Sub Command1_Click()
Dim str, str1 As Stringstr = printfn(str1)
End Sub这么短的代码，可是又错误，出现运行错误，
清高手指点迷津!!!

Answer 1

DLL我已经拷贝到系统目录下，
不是找不到DLL的错误。题是错误为:Bad DLL calling convention

Answer 2

还需要个def文件,例如要写入下面的东西
LIBRARY  TestDLL
EXPORTS  printfn