dll中某个函数定义如下：

基本信息读取函数
BOOL WINAPI ReadBasicInfo(int  iNo, char* respBuf, int* iLength );
参数：
        iNo：所读记录序号（取值范围1~11）
        respBuf：读取内容返回值(此字符串数组长度必须大于0x28即40个字节)
        iLength：返回值长度(不大于0x28)
返回值:
TRUE表示读取成功，FALSE表示读取失败

其中，respBuf iLength  这两个结果是要传回到VB中，那么vb该怎么写啊？

可以试试如下代码：
private function ReadBasicInfo lib "user.dll"(byval ino as long,byref respBufas string,byref iLength as long) as boolean 'api声明部分
dim ino as long,respBuf as string*40,iLength(40) as long
ReadBasicInfo(ino,respbuf,ilength(0))

[此贴子已经被作者于2016-10-31 18:53编辑过]

2楼，最后一个参数错了，要求一个 long 数据进行，按地址传就可以。

int  iNo,
char* respBuf,
int* iLength
首先，c的int，翻译成 long
传字符串指针的，传定长的string 或byte数组，按地址传，一定不能传vb的变长字符串类型。
按指针传的简单数据，照样按地址传就是了。如果不是按指针传的简单数据，就按值传。

请问下代码怎么写呢？

按2楼的代码，最后一个定义为单long 变量

大体抄二楼的代码
试试如下代码：
private function ReadBasicInfo lib "换成你的DLL名字"(byval ino as long,byref respBufas string,byref iLength as long) as boolean 'api声明部分
dim ino as long,respBuf as string*40,iLength as long

if ReadBasicInfo(ino,respbuf,ilength) then
'调用成功
else
'调用失败处理
end if

这种写法能够返回 respbuf,ilength 的结果吗？
我测试过，返回的结果是空的。

按地址传递应该能返回。
所以申明时应该能得到。
你判断了 函数返回值吗？是 TRUE 还是 FALSE

实在不行，用 integer 保存返回值，判断是不是等于0 。
C里，0 为FALSE，非0 为 True
VB里，0 为FALSE，true 多数时候为 1 或 -1

你第二个参数，也可以试着传一个 byte 数组进去看看。

private function ReadBasicInfo lib "换成你的DLL名字"(byval ino as long,byref respBufas() as  byte ,byref iLength as long) as boolean 'api声明部分
dim ino as long,respBuf(39) as byte ,iLength as long

if ReadBasicInfo(ino,respbuf(0),ilength) then
'调用成功
else
'调用失败处理
end if

按地址传递，即byref ，会报错： .....内存不能为written...
按值传递，即byval，也会报错：.......内存不能为read...

应该是传数组的问题，好像vb不能传数组单个元素，改成如下试试：
private function ReadBasicInfo lib "user.dll"(byval ino as long,byref respBuf as string,byref iLength as long) as boolean 'api声明部分
dim ino as long,respBuf as string*40,iLength as long
ReadBasicInfo(ino,respbuf,ilength)