描述:
VB代码:
dim strVar() as string
dim retval as integer
redim strVar(1)
strVar(0) = "test1"
strVar(1) = "test2"
retval = STRLib.Test(strVar)
怎么样写STRLib.Test这个类的函数接口和实现?
解决方案1:
http://blog.csdn.net/leechy/archive/2004/07/01/31773.aspx
这个例子vb同样适用
揭贴吧
解决方案3: 有三个例子:
微软的Knowledge Base的文章:“Q154172 ow To Pass Binary Data Between an ActiveX Control and VB”
微软的Knowledge Base的文章:“Q140202 AMPLE: MFCARRAY Using Safe Arrays in MFC Automation”
微软的Knowledge Base的文章:“Q167668 OWTO: Pass a SafeArray of Strings in a VARIANT*”
说错了,用VARIANT
HRESULT Test([in]VARIANT strVar);
safearray