给妻子的一封信 经典:如何用VB计算e=1/1!+1/2!+1/3!+1/4!+…+1/n!

来源:百度文库 编辑:高校问答 时间:2024/04/29 03:38:39
谢谢大家

楼上两位答的^^
1. for循环之后是不能随便用未知数n的
2.要知道e是一个常数 所以应是
private sub cmd1_click
dim fac as long,e as long
fac=1
while 1/fac>=0.000001
fac=fac*n
e=e+1/fac
wend
print "e =";e
end sub

设阶乘地为fac
For i=1 to n
fac=fac*i;
e=e+1/fac
这样就可以了。我不是VB的。我是学Pascal的。原理都一样

楼上的没有初始化变量:
应该是:
fac=1
for i=1 to n
fac=fac*n
e=e+1/fac
next i
print e

^_^