[Intro] (Typing sounds, electronic beat) Time for FizzBuzz. Wanna FizzBuzz. Are you ready? [Verse 1] Option Explicit Public Sub FizzBuzz Dim i As Long Dim result As String For i equals one To one hundred If i Mod 3 equals 0 And i Mod 5 equals 0 Then result equals FizzBuzz Else If i Mod 3 equals 0 Then result equals Fizz Else If i Mod 5 equals 0 Then result equals Buzz Else result equals See String eye End If Debug Print result Next End Sub [Chorus] One, Two, Fizz! Four, Buzz, Fizz! Looping through the numbers Check the logic, print the result! Fizz! Buzz! FizzBuzz! [Verse 2] Function main workbook, Excel Script Workbook Let result equals empty string For let i equals one i less than or equals one hundred i plus plus If i modulo 3 equals 0 And i modulo 5 equals 0 result equals FizzBuzz Else If i modulo 3 equals 0 result equals Fizz Else If i modulo 5 equals 0 result equals Buzz Else result equals String eye Console log result End function [Chorus] One, Two, Fizz! Four, Buzz, Fizz! Looping through the numbers Check the logic, print the result! Fizz! Buzz! FizzBuzz! [Outro] Process completed (Fade out)
