vb和C++ 调用VB编译的DLL

vb和C++ 调用VB编译的DLL



C++不带参数调用vb

'vb代码
'新建vb工程 选择【ActiveX DLL】
'工程名 TESTDLL  类名 Test
Public Sub SayHello()
  MsgBox "Hello!", vbInformation, "VBDll"
End Sub

注意 生成的DLL文件 必须注册 不然在自己的计算机能用在别人的计算机出错


//c++代码
#include <Ole2.h>
#include <comutil.h>
#include <string>
#pragma comment(lib,"comsupp.lib")
#import "D:\\TESTDLL.dll"
using   std::string;

    CoInitialize(NULL);  //初始化COM
//创建智能指针对象，用ProgID "VBActiveXDll.Class1"作为构造函数参数
TESTDLL::_TestPtr ptrclass1("TESTDLL.Test");
if (ptrclass1!=NULL)
{
//调用方法
ptrclass1-> SayHello();
uc1601("梅雷提示！VB调用成功",1);
}
CoUninitialize();




c++ 生成dll后 可以删除vb生成的dll




_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/