没有合适的资源?快使用搜索试试~ 我知道了~
VB循环结构实验报告.doc
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 72 浏览量
2022-06-25
10:16:28
上传
评论
收藏 645KB DOC 举报
温馨提示
试读
15页
VB循环结构实验报告.doc
资源推荐
资源详情
资源评论
实 验 报 告
( 2011 —2012 学年第 2 学期)
课程名称: 计算机程序设计(VB)
姓 名:
学 院:
专 业:
年 级: 2011 级
学 号:
会计学专业
经济管理学院
xxx
xxxxxxxx
实 验 报 告
2012 年 4 月 17 日 第 9.10 节 综合 楼 525 号室
进入实验室
时间
进入时仪器
设备状况
离开实验室
时间
离开时仪器
设备状况
机器号
15:25 正常 17:10 正常
13
实验项目名称
实验四 循环结构
一、实验目的
1. 掌握 For 语句的使用;
2. 掌握 Do 语句的各种形式的使用;
3. 掌握如何控制循环条件,防止死循环或不循环。
二、实验内容
1. 课本 64 页,计算存款总金额。
2. 计算 1+2+3+4+…+100 之和。
3. 随机产生 3 行 4 列的 0-99 之间的整数,输出它们。
4. 输出数列 1,1,2,3,5,8,……的前 40 项。
三、实验过程(步骤、命令)及结果(截图、源程序)
(一)做自选题 1,计算存款总金额。
(1)设置用户界面并进行属性设置
创建一个新的窗体,在窗体中加入控件并设置相应的属性。
设置后的界面如下图
(2)设置代码
对 Command1 的 Click(单击)事件添加如下代码:
Private sub command1_click()
Dim m! , s! , n%, i%
S = val (text1.text)
M = val (text2.text)
N = val (text3.text)
For I = 1 to n
S = s * (1 + m)
Next I
Text4.text = str(n) + “年后可得到: ” + str(s) + “元”
End sub
设置后详见下图:
运行后在文本框中输入“8000, 0.03, 5”,单击按钮后的界面图如下:
(二)做自行选题 2,计算 1+2+3+4+…+100 之和。
(1)设置用户界面并进行属性设置
创建一个新的窗体,在窗体中加入控件并设置相应的属性。
设置后的界面如下图
剩余14页未读,继续阅读
资源评论
智慧安全方案
- 粉丝: 3650
- 资源: 59万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功