请问下面这些delphi的DLL声明怎么转换成VB的DLL声明，谢谢

Question

function initdll(var act:word):word;stdcall;external 'bulid_vspmdllp.dll';
function freedll(var act:word):word;stdcall;external 'bulid_vspmdllp.dll';
function createvspbyname(VComName:Pchar;ip:Pchar;Port:Longword):word;stdcall;external 'bulid_vspmdllp.dll';
function deletevspbyname(VComName:Pchar):word;stdcall;external 'bulid_vspmdllp.dll';
function getvsplist(abuf:Pchar;const bufsize:word;var vspcount:word):word;stdcall;external 'bulid_vspmdllp.dll';
function getvspinfobyname(const VComName:Pchar;var vspinfo:TDLLVSPInfo):word;stdcall;external 'bulid_vspmdllp.dll';
function getdeviceojects(const odata:Pointer;const obufsize:integer;var devcount:integer;var res:integer):word;stdcall;external 'bulid_vspmdllp.dll';
function configremotebymac(const AMusterCmdInfo:TMusterCmdInfo;var res:integer):word;stdcall;external 'bulid_vspmdllp.dll';
function scandevice(var res:integer):word;stdcall;external 'bulid_vspmdllp.dll';

Answer 1

其实这个问题你应该去VB区问问，这还涉及到参数的类型问题。