gistfile1.vb

Module Module1

    Sub Main()

        For i As Integer = 1 To 100
            If i Mod 3 = 0 Then
                Console.WriteLine("Fizz")
            ElseIf i Mod 5 = 0 Then
                Console.WriteLine("Bizz")
            Else
                Console.WriteLine(i)
            End If
        Next

    End Sub

End Module