正是我表达的意思

addressof不能用来取指针，addressof的功能是用来取公共模块中过程的入口地址，虽然从内存存储上看都是地址，但一个是在数据区一个是在代码区，二者功能也是不一样的：一个用来存储，一个用来执行。

哦 是这样啊 学到了

就是AddressOf 后面跟的是程序代码的部分了

那C++的DLL中用到指针的就更麻烦了 幸亏VB可以自动取Long

这正是我不解的地方啊！~
int *Add(int *a,int **b,char (*c)[5])
{
int *p;
*p=*a+*b;
//经过一系列等的运算
return p;
}
比如上面这个函数，如果在VB中是不是这样声明：
declare function add lib "dllname"(a as long,b as long,c as long) as long
然后这样用
dim num1 as integer,num2 as integer,str1 as string
dim rec as long
rec=add(num1,num2,str1)

这样对不对？？？

VB是有专门的取地址的函数的。
AddressOf—— 专门用来取过程入口地址；
VirPtr————取变量首地址；
StrPtr————取字符串首地址；
ObjPtr————取对象首地址

看来是不对的了……因为没有传递地址

To Joform 他这里如果用 ByRef呢？

declare function add lib "dllname"(byval a as long,byval b as any,byval c as string) as long

唔 Byval……

调用方法自己结合我上面说的自己想吧。

如果是这样，那用byval的意思是什么？

下面这些还有问题吗？？？？
dim num1 as integer,num2 as integer,str1 as string
dim rec as long
rec=add(virptr num1,virptr num2,strptr str1)

如果没有！还有最后一个问题没解决，关于返回值的：
我们现在用rec接收的是一个指针，（在C/C++里用*可取出并修改该指针所指的数值）在VB里现在要读出rec所指的int值该怎么办？？？请不吝赐教！
*************************************

去试了一下，virptr,strptr在VB中报错！~~~~

[此贴子已经被作者于2007-8-29 13:27:26编辑过]