初学者,用ATL向导建立了环境,添加一新接口与接口实现类。
直接在一个CUI环境里通过COM库初始化调用可以成功,但到VB环境里就不行了,可以传递进去值,但返回不了
如
STDMETHODIMP Cleonmd5::GetInt(int *p1)
{
// TODO: Add your implementation code here
* p1 = 1000;
return S_OK;
}
就不行,为啥呢?
首先GetInt的方法应该定义成HRESULT GetInt([out , retval] int* pl);(在idl文件中)
在vb中调用如下:
Set aa = CreateObject("a.a1")
i = 100
i = aa.GetInt
MsgBox (i)
Set aa = Nothing