婚姻法规定近亲禁止结婚，其科学依据是确保后代不得遗传病。（ ）

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程。
Private Sub Command1_Click()
n=5
f=1
s=0
For i=1 To n
f=f ______
s=s+f
Next i
Print s
End Sub
该事件过程的功能是计算s=1+1/2!+1/3!+…+1/n!的值，请填空。