如何运用API获取数组的维数

作者：绿色风分类：时间：2022-08-17 浏览：134

楼主 xmyjk	Q:如何运用VBA获取数组的维数? A: Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) Private Declare Function VarPtrArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long Function Dimension(arr() As Variant) As Long Dim a As Long CopyMemory a, ByVal VarPtrArray(arr), 4 '获取储存维度的内存地址 CopyMemory Dimension, ByVal a, 2 '通过这个内存地址，获取维度值 End Function Sub test() Dim a(1), b(1, 2), c(1, 2, 3, 4, 5, 6) Debug.Print Dimension(a), Dimension(b), Dimension(c) End Sub 获取维数.zip
2楼 xyf2210	学习
3楼 0Mouse	貌似题目是想写“如何运用API获取数组的维数”，估计发帖时爱困了！O(∩_∩)O哈哈~
4楼水星钓鱼	学习了
5楼老糊涂	学习了

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表