单选题 没有如下程序：
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
程序运行后，单击窗体，输出结果是______。