栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验

[填空题] 在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim i As Integer Sum=0 n=Inp

面试经验 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

[填空题] 在窗体上画一个名为Command1的命令按钮,然后编写如下程序:  Private Sub Command1_Click()  Dim i As Integer  Sum=0  n=Inp

[填空题] 在窗体上画一个名为Command1的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
Dim i As Integer
Sum=0
n=InputBox("Enter a number")
n=Val(n)
For i=1 To n
Sum= (9)
Next i
Print Sum
End Sub
Function fun(t As Integer) As Long
p=1
For i=1 To t
p=p*i
Next i
(10)
End Function
以上程序的功能是:计算11 +2! +3!+…+n!,其中n从键盘输入,请填空。


参考答案:

fun=p

问题解析:

在命令按钮中,要计算前n个数的乘方和,[9]处填Sum+fun(i)。fun函数实现的是求一个数的阶乘,函数结束要返回计算结果,[10]处填fun=p。
转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/249120.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号