我想在VB中调用动态库(不是COM),如何调用

解决方案 »

  1.   

    加入有一个c++的函数
    extern "C" int _export FAR PASCAL add(int x,int y,char *filein) ;
    vb中可以这样调用
    语句格式为:Declare Sub 过程名Lib [ Alias " 别名]([ByVal 参数AS类型]),或为Declare Function函数名Lib [Alias " 别名]([ByVal 参数AS类型])AS类型在声明中首先用Declare关键字表示声明DLL中的函数。在C语言中有的函数类型为VOID,它表示不具有返回值,则必须用关键字Sub将其声明成过程。有的函数具有返回值,则必须用关键字Function将其声明成函数,并且在声明语句的最后要用AS关键字指明函数返回值的类型。
    例如上面的ADD.DLL在VB中就可以声明为:
    Declare Function ADD Lib c:\ADD.dll―ByVal X AS Integer, ByVal Y AS Integer ,ByVal filein as
    string)AS Integer
    通过此声明语句将函数ADD声明到VB中,便可直接调用。
    SHANNON
       ----------------
        [email protected]