问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

在VB6.0中,求1!+3!+5!+7!+9!+...+n!阶乘的和,n利用InpuBos输入。

发布网友 发布时间:2024-10-04 16:51

我来回答

2个回答

热心网友 时间:2024-10-04 22:11

Private Sub Command1_Click()
x = InputBox("shu ru shuju", "nihao")
s = Fac(Val(x))
Print s
End Sub

Public Function Fac(Num As Integer) As Double
If Num = 1 Then
Fac = 1
Else
Fac = Fac(Num - 1) * Num
End If
End Function

热心网友 时间:2024-10-04 22:05

已改:
Private Sub Command1_Click()
Dim n, i, k, s, sum
sum = 0

n = CInt(InputBox("Please input a value", ""))
For i = 1 To n Step 2
s = 1
For k = 1 To i Step 1
s = s * k
Next k
MsgBox s
sum = sum + s
Next i
MsgBox sum
End Sub
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
人教版小学英语课本哪里能下载到MP3 小学英语同步听力音频去哪里找 去陆丰旅行,要提前做好什么准备? 请教高手:苹果6s能不能安装两个微信?谢谢指点! 对于一个在女性内衣店工作的男性,你们怎么看待 ...湖是世界最深和蓄水量最大的咸水湖 B.死海是世界最低点 C.马来群 ... ...世界最大的湖泊___世界上人口最多的国家___世界上面积最大... 世界最深和蓄水量最大的湖是什么?世界最低点是哪?世界面积最大的高原... 尚赫净水器滤芯 如何清洗尚赫 vb6.0用do while循环产生10个0-100之间的随机整数求它们的和并输出... 用VB6.0中inputbox函数输入数字在text文本框中进行显示的问题? VB6.0怎样播放随机产生的三位数 ...任何篮球比赛(包括男篮和女篮包括全场和半场)罚球不论罚几球都是不... 男篮和女篮在罚球时可以跳吗 罚球可以跳吗...拜托了各位 谢谢 任何篮球比赛(包括男篮和女篮包括全场和半场)罚球脚都不能压罚球线和... 任何篮球比赛(包括男篮和女篮,包括全场和半场)罚球都是可以跳的吗? 水瓶座的男孩取个什么名字?3月6号早上5点生的,姓王!麻烦大家有好名字我... 麻烦给取个名字:男孩,第二个字带个"海". 麻烦给取个名字:男孩,姓王,第二个字带个"海".只求第三个字 谢谢 狐狸精比喻什么样的女子 选马桶关注哪些 上海虹桥火车站到闵行区莘庄镇沪闵路5600弄88支弄邻里苑怎么走_百度... 邻里苑小区简介 如何看二手车车况 在北京乘坐102路电车在北京南站下车后还要走多久才能到达南站的售票厅候... 我在北京朝阳怎么上上102国道 请问,北京南站的939总站是和102、106总站在一起吗? 刚怀孕能喝茶吗 vb6.0 用input 函数接受两个介于100至999之间的整数,然后求出第一个整 ... vb6.0 让Text1随机等于一个1-9999的4位数.不足4位数用0补充 浙江卫视奔跑吧兄弟官方‌活动咨询‌服务‌电话是什么 ...是什么电话?今天我有接到电话说我被奔跑吧兄弟栏目组起诉我说_百... bb奔跑吧兄弟 浙江卫视 官方统一咨询电话057126893655 这号码... 浙江卫视奔跑吧兄弟打骚扰电话是01059948963威胁我要罚款10万到20万是... 浙江卫视奔跑吧兄弟第二季中奖查询客服电话是多少 ...02点35分接到了一条短信 说是奔跑吧兄弟栏目组组办的一场抽奖活... 奔跑吧兄弟的QQ中奖问题,他说我不汇钱就让我坐牢是真的吗? 奔跑吧兄弟栏目组活动专线电话是多少 奔跑吧兄弟栏目组领奖热线电话是多少 奔跑吧兄弟官方热线电话是多少 米饭煮稀了能恢复原状吗? 买小产权房车库算钱吗多少钱 抖音下载失败是为什么 我想去肯德鸡做兼职可是没有就业证和社保卡应该怎么办 上周六去找了一份抄海报的兼职,怀疑可能被骗,现寻求法律援助... 家用监控摄像头,带内存卡poe供电的,能连到poe录像机上,在 手淘推荐流量最快速有效的获取方式,掌握了这几招,快速赶超同行_百度... 【自行车选购】如何挑选适合自己的自行车 自行车选购必知的五大要点