m0_46217035
gllj1135
2021-03-18 11:29

VBScript如何传入VARIANT变量到COM接口?

我发现在vbs中传入的VARIANT参数是VT_ARRAY | VT_VARIANT,但是执行到COM接口实现函数中时,就变成了VT_BYREF|VT_VARIANT,请问是什么原因?

具体情况如下:

COM接口定义:

HRESULT NewBox([in] VARIANT min, [in] VARIANT max, [out,retval] IDispatch** ppDisp);

vbs调用:
Dim minVal(2),maxVal(2)
minVal(0) = 0
minVal(1) = 0
minVal(2) = 0
maxVal(0) = 13
maxVal(1) = 13
maxVal(2) = 10
Dim b
b = VarType(minVal)'0x200C  VT_ARRAY | VT_VARIANT
Dim box3d
Set box3d = math.NewBox(minVal,maxVal)

COM接口实现:

STDMETHODIMP CMath::NewBox(VARIANT min, VARIANT max, IDispatch** ppDisp)
{
//var.vt = VT_BYREF | VT_VARIANT      在COM接口的实现体中发现VARIANT的vt变了,和vbs调用时给定的值不一样

}

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 复制链接分享
  • 邀请回答

相关推荐