问题详情

设有如下程序：
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请帮忙给出正确答案和分析，谢谢！