| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 335 人关注过本帖
标题:【求助】VB编程问题
取消只看楼主 加入收藏
ajmlgxx
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2013-11-2
结帖率:0
收藏
已结贴  问题点数:20 回复次数:0 
【求助】VB编程问题
正在练习一道VB题目:输入N,使用循环语句,计算p=1!+2!+3!+…+N!的值(N<=10)
N<=10应该怎么放进去???
这是我做的:
Private Sub Command1_Click()
Dim n As Integer, mlt As Long, Sum As Long
n = InputBox("输入n:")
Sum = 0
For i = 1 To n
mlt = 1
For j = 1 To i
mlt = mlt * j
Next
Sum = Sum + mlt
Next
Print "1!+2!+3!...+n! = "; Sum
End Sub

[ 本帖最后由 ajmlgxx 于 2013-11-2 19:48 编辑 ]
2013-11-02 19:15
快速回复:【求助】VB编程问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.052986 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved