今天是年12月20日,距年还有11天时间!
年仅剩最后的11天时间了,加油,各位学习VB的朋友!
VB算法编程在VB编程中,我们可以根据算法,利用VB知识来开发各种实际的应用程序。
今天我们以求1+1/2!+1/3!+.....+1/n!之和为例,讲解VB编程思想。这个程序非常类似于1+2+3+...+n之和的程序代码,但是仔细一看,却有很大不同。
因为这是两个不同的算法,其实我们在VB的学习中,最主要的一个方面也是学习编程的思想,有了这个思想,我们就能写出相应的代码,从而完成既定的功能。
程序运行图
我们用输入对话框来确定N的值为多少,写出下列相应的代码:
DimnAsInteger
PrivateSubCommand1_Click()
n=InputBox("请输入N")
DimsAsDouble,jcAsDouble,iAsInteger
jc=1
Fori=1Ton
jc=jc*i
s=s+1/jc
Nexti
Print"所求的"n;"阶乘分之一和为:"Format(s,"###.##########")
EndSub
运行界面如下图;
有趣的是,在N达到某个值后,其和的值会稳定在某个值附近不变,我们可以看下图的程序截图,在N大于13后,随着N的增大,其值s会稳定在一个数不变。
其实这个可以用数学上的极限来考虑。
VB学习过程中有不懂的地方
或者需要学习资料
可以长按下方