设有如下程序:Private Sub Form. Click( ) Dim s As Long f As Long Dim n As Integer i As Int

设有如下程序：

Private Sub Form. Click（）

Dim s As Long，f As Long

Dim n As Integer，i As Integer

f=1

n=4

For i=1 To n

f=f*i

s=s+f

Next i

Print s

End Sub

程序运行后，单击窗体，输出结果是（）。

A.32

B.33

C.34

D.35

请帮忙给出正确答案和分析，谢谢！