LOADLIBRARY("GETIT.DLL") FAILED.  GETLASTERROR RETURNS 0X00000485
说明这个dll可能只是一个普通的dll,并不是ActiveX DLL。而且Delphi编写的可能是COM
服务器,这样VB也无法调用,只有在Delphi编写的OLE Automation的COM组件才可以被VB
调用
将定义改为
private declare getimage lib "c:\windows\system\getid.dll" (a as string,b as string)
试试