荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: Version (让一切随风。。。), 信区: Program
标 题: Re: 请教vb
发信站: 荔园晨风BBS站 (Thu May 8 12:27:49 2003), 站内信件
用数组吧。
【 在 biao (阿北?) 的大作中提到: 】
: 我做了一个计算从1到20各个数阶乘的和，代码如下：
: Private Sub Form_Click()
: Dim i, j, s, sum As Long
: s = 1
: sum = 0
: For i = 1 To 20
: s = s * i
: sum = sum + s
: Next i
: Print sum
: End Sub
: 有个实时溢出的问题，以前计算时也遇到过，不知道怎样解决
: 各位高手帮帮忙，小弟是新手.
--
*
* *
* *
no more to say
★ just wish you ★
good luck
※ 来源:·荔园晨风BBS站 bbs.szu.edu.cn·[FROM: 192.168.1.50]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店