学习成就未来,知识改变命运!加油,各位正在学习VB编程的朋友!
VB算法编程在VB编程中,我们可以根据算法,利用VB知识来开发各种实际的应用程序。
今天我们以求1/1!+1/2!+1/3!+.....+1/n!之和为例,讲解VB编程思想。这个程序非常类似于1+2+3+...+n 之和的程序代码,但是仔细一看,却有很大不同。
因为这是两个不同的算法,其实我们在VB的学习中,最主要的一个方面也是学习编程的思想,有了这个思想,我们就能写出相应的代码,从而完成既定的功能。
程序运行图
我们用输入对话框来确定N的值为多少,写出下列相应的代码:
Dim n As Integer '通过输入对话框得到N值Dim s As Double, jc As Double, i As Integer '定义变量Private Sub Command1_Click() n = InputBox("请输入N") jc = 1 For i = 1 To n jc = jc * i s = s + 1 / jc Next i Print "所求的" & n; "阶乘分之一和为:" & Format(s, "###.##########")End Sub运行界面如下图;
有趣的是,在N达到某个值后,其和的值会稳定在某个值附近不变,我们可以看下图的程序截图,在N大于13后,随着N的增大,其值s会稳定在一个数不变。
其实这个与数学上的极限是一个道理。
在VB学习过程中有不懂的地方
可以长按下方二维码识别
添加老师微信
学习问题在线解答