vb里面调用delphi做的dll的问题。

Question

function DecodeBase64(Source:pchar):pchar; stdcall;external 'Project2.dll';
function EncodeBase64(Source:pchar):pchar;stdcall;
external 'Project2.dll';
这个是delphi 调用没有问题.但是在vb里面怎样调用呢
这个是我使用vb调用的例子  但是不对，请大家帮忙看看
Declare Function DecodeBase64 Lib "Project2.dll" (ByVal Source As String) As String
 Declare Function EncodeBase64 Lib "Project2.dll" (ByVal Source As String) As String能够调用 但是得到的字符串不对
关闭的时候出
错误提示是:
"0x0000000"指令引用的"0x0000000"内存,该内存不能为"read".
要终止程序,请单击"确定".
要调试程序,请单击"取消".
这个提示？？String更改成variant 根本就不能调用 提示
错误提示是:
"0x0000000"指令引用的"0x0000000"内存,该内存不能为"read".
要终止程序,请单击"确定".
要调试程序,请单击"取消".

Answer 1

改好了，已经给你回复了。函数的数据类型定义根本不是ShortString，而是PChar类型，而且两个函数的参数传递方式也不一致，一下没注意调试的时候老出现异常错误。