如何从数组中选择特定元素？

Question

让我们考虑以下代码，它以以下方式创建数组：

Function my_fun(a As Double, b As Double, n)

    Dim arr() As Variant
    ReDim arr(n - 1)
    Dim i As Integer

    arr(0) = 0
    arr(1) = 1
    For i = 2 To n - 1
        arr(i) = a * arr(i - 1) + b * arr(i - 2)
    Next i
    
    my_fun = Application.Transpose(arr)
    
End Function

此代码返回数组，其中下一个元素是下一个序列值。 如何让我的 function 返回该数组的最后一个元素而不仅仅是数组？ 例如：

在这种情况下，代码应该返回 4，因为它是数组的最后一个元素。 你知道如何执行吗？

Answer 1

要返回数组的最后一个元素：

my_fun = arr(Ubound(arr))

或者因为上限是n - 1 ：

my_fun = arr(n - 1)