如何從數組中選擇特定元素？

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)