```vbModule FactorialSumSub Main()Dim n As Integer = 12 设定 n 的最大值为 12Dim sum As Long = 0For i As Integ
