Het programma van Microsoft Office Word tekstverwerking omvat de Visual Basic for Applications tool waarmee gebruikers voor het invoegen van berekende velden, zoals een Fibonacci-reeks van getallen, in hun tekstdocumenten scripting. De Fibonacci getallen zijn het gehele getal 0, 1, 1, 2, 3, 5, 8, 13, 21,...-sequentie, waarin elk item is de som van de vorige twee nummers in de reeks. Door de uitvoering van een recursieve gesp in uw VBA-script, kunt u een Fibonacci-reeks in VBA Word berekenen.
Klik op de "Start" knop in Windows en selecteer het programma dat "Microsoft Word".
Klik op "Extra" en vervolgens op 'Scripts' als de VBA-script voor de berekening van een Fibonacci-reeks wilt maken.
Voer de volgende code in het venster:
Functie fibonacci (ByVal n as Integer)
Als (n<= 0)="">=>
Fibonacci = 0
ElseIf (n = 1) dan
Fibonacci = 1
Anders
Fibonacci = fibonacci(n-1) + fibonacci(n-2)
End If
End Function
Klik op "Bestand" en vervolgens "opslaan" om de "fib.doc" Word-document opslaat met de VBA-script voor de berekening van de Fibonacci-reeks van getallen.