作业帮 > 综合 > 作业

编程;VB 编写一个过程,用来计算下列表达式的值,并在事件过程中调用.S=1+1/2!+1/3!+...+1/n!

来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:综合作业 时间:2024/05/08 02:01:42
编程;VB 编写一个过程,用来计算下列表达式的值,并在事件过程中调用.S=1+1/2!+1/3!+...+1/n!
编程;VB 编写一个过程,用来计算下列表达式的值,并在事件过程中调用.S=1+1/2!+1/3!+...+1/n!
Private Sub Form_Activate()
a 5
End Sub
Sub a(n As Long)
Dim i As Long
For i = 1 To n
Sum = Sum + 1 / f(i)
Next i
Print Sum
End Sub
Function f(n As Long) As Long
Dim i As Long
f = 1
For i = 1 To n
f = f * i
Next i
End Function