求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)!

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/03 01:47:27
求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)!

求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)!
求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)!

求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)!
Private Sub Form_Click()
Dim He As Long
Dim I As Integer, M As Integer, N As Integer
M = Int(Val(InputBox("M的值", "输入", 3)))
N = Int(Val(InputBox("n的值", "输入", 4)))
For I = M To M + N
He = He + Ji(I)
Next
Print M; "!+"; M + 1; "!+.+"; M + N; "!="; He
End Sub
Private Function Ji(X As Integer) As Long
Dim J As Integer
Ji = 1
For J = 1 To X
Ji = Ji * J
Next
End Function
说明:
(1)不需要任何控件.
(2)单击窗体即可运行,且可以重复点击运行.
(3)已经运行调试过.

求编程高手,用VB计算出n!+(n+1)!+(n+2)!+...+(n+m)! 用VB编程 求1+2+3+……+n,n由键盘输入 用VB编程求Fibonacci数列的第n项 vb编程实现求sum=1/1!+1/2!+1/3!+ +1/n! (n VB编程n!+(n+1)!+(n+2)!+(n+3)!+……+(n+m)!要有控件 vb编程 用递归函数求数列1,1,2,3,5,8,13,21.的第N项RT VB题 编程求S=1²+2²+3²+.+N²(其中N的值要求用键盘输入) VB编程,输入n个整数,求它们的最大公约数.注意:是n个整数 1+2/1+3/1+.+n/1 2/1+4/1+.+2n/1 用VB编码编程. VB编程:写求1到n的和Function Sum的过程VB编程:设计一个屏幕保护程序,屏幕上显示当前系统时间.VB编程:在PictureBox控件内,用Line方法和Pest方法绘制正弦和余弦曲线. vb 编程:设M和N是正整数,输入M,求当2的N次方大于等于M时,N的最小值 用循环语句编 请用VB程序编程求两个正整数m和n的最大公约数和最小公倍数.如上标题,用VB程序实现 急求高手解答用VB编程“求1-100之间可以被5或7整除的数之和. VB编程:用递归方法求n阶勒让德多项式的值,递归公式为:当n=0,Pn(x)=1 当n=1,Pn(x)=x当n>1,Pn(x)=((2n-1)*x*Pn-1(x)-(n-1)*Pn-2(x))/n求代码! vb求n!(n!=1*2*3*...*n),n是自然数.编程要求:1.单击窗体时用InputBox()输入n的值.2.结果存在变量Term中.3.在窗体中输出Term的结果.4.程序编译通过后,输入n=10进行测试 vb编程求和sum=1!+3!+5!+.+(2n-1)! vb 编程输出fibonacci数列的前N项 VB编程计算下列公式的值,其中n (