RosettaCodeData/Task/Compile-time-calculation/Visual-Basic-.NET/compile-time-calculation-4.visual

Module Program
    Sub Main()
        Dim factorial As Integer
        factorial = 10 * 9 * 8 * 7 * 6 * 5 * 4 * 3 * 2 * 1
        Console.WriteLine(factorial)
    End Sub
End Module