Excel vba 数组批量赋值有其他好的表达方式达到所要的结果吗

Excel vba 数组批量赋值有其他好的表达方式达到所要的结果吗,第1张

数组本身就可以包含多个成员,无需定义多余变量,参考代码如下:

Sub Test()

    Dim strMB(1 To 2) As String

    

    strMB(1) = "甲,乙"

    strMB(2) = "丙,丁"

    

    Dim intIndex As Integer

    Dim varArray(1 To 2) As Variant

    

    For intIndex = 1 To 2

        varArray(intIndex) = Split(strMB(intIndex), ",")

    Next

End Sub

将变量 varArray 添加到监视窗口后的显示结果如图所示:

此时的 varArray 数组实际上是一个嵌套数组,varArray(1) 和 varArray(2) 是 varArray 数组的两个成员,而它们本身又是一个分别嵌套了 varArray(1)(0 To 1) 和 varArray(2)(0 To 1) 这两个数组的数组!

VARIANT 获得的接口是IDiapatch接口,

c代码

VARIANT var;

IDispatch pDispatch

if(varvt==VT_BYREF|VT_DISPATCH)

{

pDispatch=varppdispVal

}

else if(varvt==VT_DISPATCH)

{

pDispatch=varpdispVal

}

以上就是关于Excel vba 数组批量赋值有其他好的表达方式达到所要的结果吗全部的内容,包括:Excel vba 数组批量赋值有其他好的表达方式达到所要的结果吗、如何转换olevariant或variant为接口类型interface、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/web/9588363.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-29
下一篇 2023-04-29

发表评论

登录后才能评论

评论列表(0条)

保存