|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 求高手帮忙解决一道编程题
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
480
人关注过本帖
标题:
求高手帮忙解决一道编程题
只看楼主
加入收藏
moon01
等 级:
新手上路
帖 子:9
专家分:0
注 册:2009-11-18
结帖率:
100%
楼主
收藏
已结贴
√
问题点数:20 回复次数:1
求高手帮忙解决一道编程题
编写一个程序计算1+3-5+7-9+11-13+15-......99,并计算结果。
我编了几次,都得不到我用数学计的结果呢。
小弟先谢谢啦~
搜索更多相关主题的帖子:
计算
编程
2009-11-18 20:22
举报帖子
使用道具
赠送鲜花
msgj
等 级:
蝙蝠侠
威 望:
4
帖 子:190
专家分:914
注 册:2009-10-3
第
2
楼
收藏
得分:20
Dim a As Integer, i As Integer
Private Sub Form_Load()
a = 1
j = 1
For i = 3 To 100 Step 2
If j Mod 2 = 1 Then a = a + i
If j Mod 2 = 0 Then a = a - i: j = 0
j = j + 1
Next
Text1.Text = a
End Sub
收到的鲜花
moon01
于
2009-11-19 22:33
送鲜花
3朵 附言:谢谢你的解答~我想请问一下能用do while循环 ...
2009-11-18 21:03
举报帖子
使用道具
赠送鲜花
2
1/1页
1
快速回复:
求高手帮忙解决一道编程题
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.016433 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved