获取函数返回的数组的第一个值

时间:2019-02-12 14:41:02

标签: excel vba

我正在尝试检索函数返回的数组的第一个值,而不将返回的数组分配给临时数组。

function Return_Array as MyClass()
   Dim TmpArr() as Myclass
   'Fill TmpArr
   return_array = TmpArr
end function

sub Do_Something
   'things
   MyVar = MyConst + Return_Array()(0).MyMethod  'Works :)
   'More things
end sub

sub Do_Something_Bis
   'things
   Dim TmpArr() as Myclass
   TmpArr = Return_Array
   MyVar = MyConst + TmpArr(0).MyMethod  'Works but not as elegant
   'More things
end sub

期望的结果是:返回Return_Array返回的数组中的第一个值。

编辑:已解决

0 个答案:

没有答案