- 1、本文档共10页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验报告模板(Ⅰ)2
内蒙古工业大学信息工程学院
实 验 报 告
课程名称: 实验名称:
实验类型: 验证性□ 综合性 设计性□
实验室名称: 班级: 学号:姓名: 组别: 同组人: 成绩: 实验日期: 2009-6- 实验报告撰写要求
实验前用预习报告纸撰写预习报告,预习报告包括以下内容
实验目的
实验用仪器设备、器材或软件环境
实验原理、方案设计、程序框图、预编程序等
实验过程中需要记录的实验数据表格
实验过程中,要认真观察,仔细记录
完成实验后用实验报告纸撰写实验报告,包括以下内容
仪器设备型号及编号
实验器材或软件环境
实验步骤、程序调试方法
实验数据处理及结果分析
实验中存在的问题
体会及思考题
报告撰写时,要求格式规范、书写整齐
预习报告成绩: 指导教师审核(签名): 2009年 6月 5 日
预习报告
一.实验目的: 学会综合运用循环结构、数组和过程进行程序设计的方法。
Public Sub sushu n 子程序
Dim b%
For b 2 To Sqr n 循环
If n Mod b 0 Then 筛选素数
Exit For
End If
Next b
If b Sqr n Then
i i + 1 素数求和
s s + n
Picture2.Print n;
If i Mod 10 0 Then 每10个数一行
Picture2.Print 打印
End If
End If
End Sub
Private Sub Command1_Click
Randomize 增强随机性
Dim j%
For j 1 To 100 循环100次
a j Int Rnd * 90 + 10 产生10到99的随机数
Picture1.Print a j ;
If j Mod 10 0 Then
Picture1.Print 一行打印10个数
End If
Next j
End Sub
Private Sub Command2_Click
Dim j%
For j 1 To 100
Call sushu a j 调用子程序
Next j
Print
Print
Picture3.Print 素数的个数:;
Picture3.Print 素数加起来的和:; s
End Sub
Private Sub Command3_Click
End
End Sub
框图设计:
四.实验过程中需要记录的实验数据表格。
控件名称 属性 属性值 备注 Command1 Caption 产生随机整数 标题 Command2 Caption 运行 标题 Command3 Caption 结束 标题 Picture1 Caption ? 清空 Picture2 Caption ? 清空 Picture3 Caption 清空 Label1 Caption 随机产生100个10~99之间的整数 标签 Label2 Caption 产生的素数 标签 Label3 Caption 结果 标签
实验报告成绩: 指导教师审核(签名): 2009年6月 7日
实验报告
一.仪器设备型号及编号 安装了Microsoft Visual Basic 6.0 中文版的普通电脑即可。
二.软件环境 Microsoft Visual Basic 6.0 中文版VB环境,选择“标准EXE”,单击“确定”命令,进入VB主窗口。
三.实验步骤 程序调试方法 实验步骤: 1.设计用户界面 2.启动VB环境,选择“标准EXE”,单击“确定”命令进入VB主窗口。 3.在窗体中添加三个图片框,三个标签,两个命令按钮,其属性见表格。 4.编写程序代码: Dim a 100 , s%, i% Public Sub sushu n Dim b%
For b 2 To Sqr n If n Mod b 0 Then Exit For
End If
Next b
If b Sqr n Then
i i + 1 s s + n
Picture2.Print n;
If i Mod 10 0 Then Picture2.Print End If
End If
End Sub
Private Sub Command1_Click
Randomize Dim j%
For j 1 To 100 a j Int Rnd * 90 + 10
Picture1.Print a j ;
If j Mod 10 0 Then
Picture1.Print
End If
Next j
End Sub
Private Sub Command2_Click
Dim j%
For j 1 To
文档评论(0)