De reeks van Fibonacci begint met de volgende getallen. De eerste rij is het rangnummer van de term; de tweede rij is het Fibonacci getal dat overeenkomt met deze term:

0
1
2
3
4
5
6
7
8
9
10
11
...
0
1
1
2
3
5
8
13
21
34
55
89
...

Het volgende recursieve voorschrift berekent de n-de term van de reeks, waarbij n >= 0:

Function fib(ByVal n As Integer) As Long
Dim temp As Long
If n = 0 Then
temp = 0
Else
If n = 1 Then
temp = 1
Else
temp = fib(n - 1) + fib(n - 2)
End If
End If
fib = temp
End Function

De tussenresultaten kunt u gemakkelijk in de volgende boomstructuur herkennen.