请教一道vb的填空题以及上机考试问题!

来源：百度知道 编辑：UC知道 时间：2024/05/03 05:31:29
改过程是用于计算E的值并将结果输出,要求精确到0.000000000000001.
E的计算公式是: E=1+1/1!+1/2!+1/3!+/...+1/n!
option explict
public sub e()
dim n,term,t
n=0: term=1: t=1

do
n=n+1
t=-------
term=term + t
loop while t>0.000000000000001
form1.print "e="& str(term)
end sub

答案是 t/n 对不对? t 代表什么意思?
我的理解是n就是中的n(不是1/n!), term 是累加总和, t则是1/n!
如果这样理解正确的话,答案应该是1/t*n不是吗?----请高手指教!!

上机调试问题:
VB二级考试中,调试或改错题要求在改错或者填空完成后,在窗体模块编写代码调用标准模块中的自定义函数或sub 过程(如果有多个过程或函数要注意调用的顺序否则出错),调试运行程序,使输出正确结果.

请问: 在窗体模块编写代码调用标准模块(如上述代码)中的自定义函数或sub 过程-----如何调用这些标准模块? 是直接把代码复制还是运用某个语句或者进行其他操作? 如果有多个过程,如何顺序调用??!!
请详细解答,谢谢!
请问：调用：call e() 是窗体模块一打开就写语句 call e(),还是在结尾？ 或者代码设计中需要调用的地方？
比如上述题目根据考试要求，窗体打开后代码应该怎么写？？
1.private sub form-click()
call e()

2 .call e()
private sub form-click()

3.call e()
private sub form-click()
call e()
上述123哪个正确？

完整的过程如下：
Option Explicit
Public Sub e()
Dim n, term, t
n = 0: term = 1: t = 1
Do
n = n + 1
t = t / n
term = term + t
Loop While t > 0.000000000000001
Form1.Print "e=" & Str(term)
End Sub

Private Sub Form_Click()
Call e
End Sub

分析下数列
每一项是前一项的1/n，
所以t=t/n
该语句中前一个t是数列当前项，赋值号后的t是数列前一项

调用：call e()
private sub form_click()
call e()

end sub