vb调用带有出参和入参函数的dll的问题

Question

vc 函数原型：
int  med_init(char * out_errmsg,char * out_AKH022)功能描述：
打开客户端软件时需要执行的函数，测试中心是否可以远程访问，如果不能返回：“中心连接失败！”；同时在KH10表中增加一条记录，返回主键值AKH022作为连接号
注意：AKH022连接号又作为其他接口方法的入参数入参定义：无
出参定义：
序号 出参 出参说明 最大长度 备注
out_errmsg 错误信息 200
out_AKH022 登录密码 20 返回值：状态标志
状态标志=0, 执行成功；
状态标志<0, 执行失败；需要获取错误信息。
怎么调用呢？

Answer 1

int  med_init(char * out_errmsg,char * out_AKH022)decalre function med_init lib "xx.dll" (byval out_errmsg as string,byval out_AKH022 as string) as longdim out_errmsg as string*255
dim out_AKH022 as string*255dim r as longr=med_init(out_errmsg,out_AKH022)
...