请问在VC中调用VB写的dll该如何调用呢？

[Lzh_lee]

如提。因一控件只能在VB里用。

[Lzh_lee]

怎么不能up的？

[kingzai]

1.使用#import产生智能指针，再使用。
2.用CLASSWIZARD导入DLL、TLB等文件。直接产生自动化类

[Lzh_lee]

kingzai(),能不能给个实例呢，我#import进去以后就不知道该怎么做了，根本不知道该怎样定义那个类。比如我定义的DLL名为reportdll.dll,提供了一个类reportprinter,这个类包含了两个方法，一个是GetStr(str1 as string,str2 as string),另一个是print()。现在我想在VC程序中调用这两个方法。

[hu_sunsky]

kingzai大侠能不能说得具体一点,对智能指针我不是很熟,谢谢

[kingzai]

//in my example,VB component is activex.it have a method
//CountStringLength
#include <iostream.h>
#include <comdef.h>
#include "vbTestCOM.h"

void main()
{
// Declare an HRESULT and a pointer to the clsVBTestClass interface
HRESULT hr;
_clsVBTestClass *IVBTestClass;

// Now we will intilize COM
hr = CoInitialize(0);

// Use the SUCCEEDED macro and see if we can get a pointer
// to the interface
if(SUCCEEDED(hr))
{
hr = CoCreateInstance( CLSID_clsVBTestClass,
NULL, CLSCTX_INPROC_SERVER,
IID__clsVBTestClass,
(void**) &IVBTestClass);

// If we succeeded then call the CountStringLength method,
// if it failed then display an appropriate message to the user.
if(SUCCEEDED(hr))
{
long ReturnValue;
_bstr_t bstrValue("Hello World");

hr = IVBTestClass->CountStringLength(bstrValue, &ReturnValue);
cout << "The string is: " << ReturnValue << " characters in length." << endl;
hr = IVBTestClass->Release();
}
else
{
// Something went wrong
cout << "CoCreateInstance Failed." << endl;
}
}
// Uninitialize COM
CoUninitialize();
}

[stzhou]

我不太懂VB，你所说得DLL是封装了控件的形式吗？如果是，用#import就可以了。如果是纯粹的API，可以采用动态连接的方式。

[Lzh_lee]

是的，我的DLL中封装了在VC中不可用的控件。我用了kingzai()的方法，hr的返回为空。给位能帮我看看吗？或者另指点迷津
#import "reportdll.dll" no_namespace named_guids

HRESULT hr;
_ReportPrinter *reporter;
hr = CoInitialize(0);
if(SUCCEEDED(hr))
{
hr = CoCreateInstance(CLSID_ReportPrinter,NULL, CLSCTX_INPROC_SERVER,IID__ReportPrinter, (void**) &reporter);

if(SUCCEEDED(hr))
{

AfxMessageBox("ok1");
}
else
{
AfxMessageBox("lost");
}
}

[Lzh_lee]

不好意思，自己摆了一个乌龙，我在一个目录里编译了那个dll，然后在那个目录注册了，再把那个dll拷到vc源程所在目录。谢谢你，kingzai()

[nicolas]

呵呵，我一般是反过来做：VB调用VC写的dll.

[Lzh_lee]

没办法下的办法了，因为必须要用到一个控件，但那控件只能在VB中用，但程序却又要用VC写，嘻嘻，是不是很复杂，见丑了。