VB用循环求 3!+5!+7!+9! 输出标签是Label1

[复制链接]
查看11 | 回复2 | 2011-11-4 15:50:09 | 显示全部楼层 |阅读模式
dim s as longdim temp as longdim i as integers=0temp=1for i =1 to 3temp=temp*inexts=s+temptemp=1for i =1 to 5temp=temp*inexts=s+temptemp=1for i =1 to 7temp=temp*inexts=s+temptemp=1for i =1 to 9temp=temp*inexts=s+tmeplabel1.caption=s...
回复

使用道具 举报

千问 | 2011-11-4 15:50:09 | 显示全部楼层
Private Sub Command1_Click()
Dim i, j, k, s As Single
s = 0
For i = 3 To 9 Step 2
k = 1
For j = 1 To i
k = k * j
Next j
...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行