VB调Delphi的DLL,该怎么处理

VB调Delphi的DLL
Delphi中声明:  
function   fGetStr(Str:   PChar):   PChar;
begin
                Result   :=   Str;
end;

VB中怎么调用?

[解决办法]
把函数声明为stdcall，在VB中像调用API哪样调用
[解决办法]
Delphi 中做成 DLL，并且 Export

然后类似于这个 API 一样调用

Private Declare Function GetWindowText Lib "user32 " Alias "GetWindowTextA " (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long




[解决办法]
vb中是string ,要加byval