VB实验报告书(第三版)

1、前言本课程是一门面向全校各专业学生的公共必修课，它以microsoft 公司的可视化编程工具visual basic 6.0为例，主要介绍高级程序设计的方法。visual basic 6.0由于其具有界面友好、操作方便等优点，是从事计算机程序设计的最佳编程工具之一，同时也是学习windows 编程的极好语言。通过本课程的学习，使学生掌握用windows 编程解决实际问题的一般方法，包括语句、函数、控件等概念的掌握，以及从基本控件的使用到高级控件的应用，从图形编程、文件使用到多媒体程序开发，从数据库编程到定制activex控件等内容，为培养学生结合专业进行软件开发的能力打好基础。实验要求高级程序

2、设计实验是高级程序设计课程的重要组成部分，属于公共必修实验范畴，是与相关教学内容配合的实践性教学环节。学生通过实验，验证课堂学习的知识，掌握界面设计、算法设计、编程实现和程序调试的方法，从而提高编程能力。在高级程序设计的课程实验过程中，要求学生做到：（1）预习实验指导书有关部分，认真做好实验内容的准备，就实验可能出现的情况提前作出思考和分析。（2）仔细观察实验操作时出现的各种现象，记录主要情况，作出必要说明和分析。（3） 认真书写实验报告。实验报告包括实验目的和要求，实验情况及其分析。（4）遵守机房纪律，服从辅导教师指挥，爱护实验设备。（5）实验课程不迟到，如有事不能出席，所缺实验一般不补。实

3、验的验收将分为两个部分。第一部分是上机操作，包括检查程序运行和即时提问。第二部分是提交书面的实验报告。目录实验一vb 集成环境及简单应用程序的建立 . 1 实验二vb6.0 常用函数的使用. 4 实验三数据的输入输出及顺序结构程序设计. 7 实验四vb6.0 选择结构程序设计. 10 实验五vb6.0 循环结构程序设计. 13 实验六vb6.0 常用控件 . 17 实验七vb6.0 数组程序设计. 20 实验八vb6.0 过程程序设计. 24 实验九vb菜单、对话框与多重窗体程序设计. 27 实验十文件操作 . 31 实验十一数据库设计 . . 35 实验十二多媒体控件的使用. . 38 实验

4、十三程序设计中的相关算法. 41 实验十四项目实践 -五子棋软件设计 . 44 实验十五项目实践 -数据库应用 . 49 vb6.0 高级程序设计实验报告书1 实验一vb 集成环境及简单应用程序的建立一、 实验目的1了解 visual basic6.0集成开发环境；2掌握窗体中控件的对象的建立、选定、调整布局、 属性设置和删除等操作方法；3掌握 vb应用程序建立的基本方法；4掌握工程管理的方法。二、实验内容1启动和关闭visual basic6.0 系统，在集成开发环境中分别寻找“窗体窗口”、 “属性窗口”、 “工程资源管理器” 、 “窗体布局窗口” 、 “工具箱窗口” ，熟悉它们的默认位置；

5、在“视图”或“工程资源管理器”中切换显示“代码窗口”和“窗体窗口”；在“视图”菜单中点击“立即窗口”，观察刚刚显示出来的“立即窗口”；尝试分别将各部分关闭，然后再用“视图”菜单中对应的菜单命令将其显示。2将工具箱中的每一个常用控件添加到窗体中，并识别这些控件；对窗体中的控件，作选定、调整布局和删除等操作；学会设置窗体、命令按钮、文本框的最常用属性；在代码窗口中找到窗体、命令按钮、文本框的主要事件，学会在对象事件过程中输入代码。3程序界面见下图，要求当按“显示内容”按钮时，文本框中出现红色的“hello,visual basic！ ”的文字，按“清屏”按钮时，文本框中文字消失，按“结束”按钮后，

6、程序结束。三、实验报告书将第 3 个实验内容写成实验报告书。图 1-1 实验 1.3 界面vb6.0 高级程序设计实验报告书2 实验报告书日期：年月日周次：星期：成绩：实验题目程序清单：vb6.0 高级程序设计实验报告书3 输入数据：输出结果：实验中出现错误及处理方法：实验体会教师评语教师：vb6.0 高级程序设计实验报告书4 实验二vb6.0 常用函数的使用一、实验目的1掌握常量和变量、表达式的基本概念和正确书写格式；2掌握运算符及表达式的用法；3掌握赋值语句和常用函数的正确使用方法。二、实验内容1假设有变量a=2,b=5,c=4,d=3,e=6，编写程序，计算表达式a+bc and d*a

7、=e的值，将结果打印在窗体上。2把自己的姓名在窗体上反向输出。提示：汉字在计算机内存储时，占2 个字节的位置，而此处用left 、mid、right取汉字字节时，仍占一个字节。3编写程序，界面如图2-1 所示。使得单击一次按钮可以产生一个60,90 之间的随机数并显示在标签1 上，再求出该数的正弦值，将结果写在标签2 上。提示：使用rnd 函数产生随机数，注意，为了防止两次运行程序的随机数序列相同，调用rnd 之前先用randomize 语句进行初始化。产生某闭区间内的随机数的公式为： (上限 -下限 +1)*rnd+ 下限。求正弦值函数为：sin()。三、 实验报告书单号选实验2，双号选实验

8、3 写实验报告书。图 2-1 实验 2.3 界面vb6.0 高级程序设计实验报告书5 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书6 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书7 实验三数据的输入输出及顺序结构程序设计一、实验目的1掌握常用输入输出控件的使用；掌握数据输出的方法print及其相关函数；2掌握输入输出函数和过程，如inputbox函数、 msgbox函数和过程的使用；3学会设计简单的顺序结构程序，进一步理解vb 应用程序的编程机制。二、实验内容1编写程序， 要求用户输入下

9、列信息：姓名、 年龄、 通信地址、 邮政编码、 电话，然后将输入的数据用适当的格式在窗体上显示出来。2编写一个华氏温度f 与摄氏温度c之间转换的应用程序，界面如图3-1 所示，其中 f 与 c之间的关系为：3259cf。3编写计算圆面积和球体积的程序，程序运行界面如图3-2 所示。要求输出结果只保留四位小数；如果半径的输入不合法，例如含有非数值字符，应该用 msgbox报告输入错误，并在错误信息得到用户确认（点击msgbox 对话框上的“确定”按钮）之后，将输入焦点转移到输入半径的文本框中，且将当前的非法输入自动选定，反白显示。提示：判断输入值是否为数值类型可用函数isnumber（） ；当字

10、符串类型向数值类型转换时用函数val（） ；而当数值类型向字符串类型转换时，可以用str（）函数或格式化函数format（） 。三、 实验报告书单号选实验2，双号选实验3 写实验报告书。图 3-1 实验 3.2 界面图 3-2 实验 3.3 界面vb6.0 高级程序设计实验报告书8 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书9 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书10 实验四vb6.0 选择结构程序设计一、实验目的1掌握逻辑表达式的正确使用方法；2掌握单分支、双分支和多分支条件

11、语句结构的使用，熟悉选择结构程序设计。二、实验内容1有函数：)10(124)101(23) 1(xxxxxxy写一个程序， 输入 x 值后，则输出相应y 值。 要求用“if elseif endif” 和用 “select case”两种方法完成该题目。注意：区分1x10 和 1=x and x10 有什么不同。2编写一个判断给定坐标在第几象限的程序，界面如图4-1 所示。3编写一个简易学生成绩管理系统，要求输入姓名和成绩，点击“添加” 按钮后，在文本框中追加并换行显示“姓名”、 “成绩”和“合格”或“不合格”信息，如图 4-2 所示。提示： 换行追加并且显示时，可用 text1.text =

12、 text1.text & vbcrlf & （待追加并显示的字符串） ，同时应该将text1 的 multiline 属性设置为true，scrollbars 属性设置为 both。进一步要求：按照90 为“优”， 80 为“良”， 70 为“中”， 60 为“及格”， 6000 为止。图 5-1 实验 5.1 界面图 5-2 实验 5.2 界面vb6.0 高级程序设计实验报告书14 4计算222214131211ns的值，当第i 项52101i时结束。5使用双重循环，输出“九九乘法表”，如图5-3 所示。提示：（1）注意行号和该行乘法单元的个数之间的关系。（2）注意乘法单元

13、的规律：“4312”中 4 为行号， 3 为列号，且列号不大于行号。（3）乘号“”可从汉字输入法软键盘菜单的“数学符号”中找到；或从word 中菜单【插入】- 【符号】中找到，再从word中剪切或复制到vb代码中。（4）可以将窗体的autoredraw 属性设为 true ，以防初始大小的窗体显示不下全部内容。6显示所有的水仙花数。所谓水仙花数，就是指一个3 位正整数，其各位数字的立方和等于该数本身。例如，333351153， 153 即为水仙花数。提示：本题目解法有两种：（1）对 3 位数的各位数组合进行穷举：利用3 重循环， 将 3 个个位数组成一个 3 位数进行判断。例如，3 位数的各位

14、数从高位到低位依次为a、b、c，则对应的 3 位数为 a*100+b*10+c 。（2）对所有 3 位数进行穷举：利用单循环对所有3 位数进行穷举， 循环内将一个 3 位数拆成3个个位数进行判断。 例如，对 s678 进行拆解时： 个位数 s mod 10；十位数（s10 ） mod 10 ；百位数 s100 。当然，也可以将上述拆解过程写为一个循环（这时就是利用双重循环，内层循环即为拆解过程）。三、 实验报告书从上面实验内容中选一题写实验报告书。图 5-3 实验 5.5 界面vb6.0 高级程序设计实验报告书15 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0

15、 高级程序设计实验报告书16 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书17 实验六vb6.0 常用控件一、实验目的1掌握常用控件的重要属性、方法和事件，熟悉它们的使用；2熟悉面向对象的可视化编程的框架。二、实验内容1如图 6-1 所示，用列表框、框架、单选按钮、复选框等控件实现对文本框中文字的字体、字号和粗斜体属性的设置。2在实验 6-1 的基础上， 用计时器控件实现在窗体的标题栏上显示当前系统的日期和时间信息，刷新周期为1 秒种。3如图 6-2 所示， 用列表框实现两个列表之间的增加和删除操作。当点击标题为“”的按钮时，就将候选列表里当前

16、被选中的项移动到选定列表最后；当点击标题为“ 0loop 循环来实现。（2）使用 left()、 right()、mid() 等标准函数来重新构造结果字符串，以达到删除子字符串sc 的目的。6用递归法求得fibonacci数列（ 1 1 2 3 5 8 13 21 34, ）的第20、200 项。fibonacci数列数学描述式为：f（i ）= f （i-2 ）+f（ i-1 ）。三、 实验报告书从上面实验内容中选一题写实验报告书。vb6.0 高级程序设计实验报告书25 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书26 输入数据：输出结

17、果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书27 实验九vb菜单、对话框与多重窗体程序设计一、实验目的1掌握下拉菜单和弹出式菜单的设计和使用方法；2熟悉工具栏、状态栏的应用；3掌握各种标准对话框的使用；4掌握多窗口和多文档界面的概念及其区别，学会选用适当的架构来编写程序；5熟悉鼠标和键盘的事件。二、实验内容1建立窗口菜单，实现一个简易文本编辑器，如图9-1 所示。文本框中的文本属性由菜单“设置”中来指定，当单击“退出”时，结束程序。在设计菜单时，试给“设置”、 “字体”、 “字号”子菜单分别加上热键“c” 、 “n”和“ s” ， “退出”菜单项加上热键“q”

18、 。2将实验 9-1 的源程序拷贝一份，且对它做如下修改，使得运行界面如图9-2 所示。将“字体”和“字号”两项合为“字体”一项，增加菜单项“前景色”、“背景色”，并分别加上热键“f”和“b”。增加“文件”菜单，含有“打开”和“保存”两个菜单项，并分别加上热键“o ”和“ s”。再对若干菜单项加上快捷键。当单击“字体”菜单项后，弹出“字体”对话框；单击“前景色”、“背景色”菜单项后弹出“颜色”对话框；单击“打开”菜单项，则弹出“打开”文件对话框，且只显示“*.txt”文件，选定文件后，点击对话框上的“打开”按钮后，则打开相应文件，将其内容读出，按前面设置的属性显示在文本框中；单击“保存”菜单项

19、后，弹出“保存”或“另存为”文件对话框，输入文件名后，点击对话框上的“保存”按钮，则将当前文本框中内容写入相应文件。图 9-2 实验 9.2 界面图 9-1 实验 9.1 界面vb6.0 高级程序设计实验报告书28 3在实验 9-3 的基础上， 增加工具栏和状态栏。工具栏中有 “打开”、 “保存”、“字体”、“前景色”、“退出”、“关于”菜单项相对应功能的按钮；状态栏中显示文本框中当前的字数。提示：首先， 从 【工程】- 【部件】中选择并加入 【microsoft windows common controls 6.0 】 ，这时就可以看到控件栏中加入了好几个activex控件，其中有工具栏控

20、件、状态栏控件和图像列表控件（imagelist控件）。工具栏中按钮的图标一般是从imagelist控件中选取，因而应先将选好的图片存入 imagelist控件中。图标可从“,graphicsbitmapsoffctlbrlargecolor”子目录中选取。4编写一程序， 要求响应键盘的4 个方向键， 如图 9-4 所示，当按一次某方向键，就使图片向相应的方向移动50 单位距离。三、 实验报告书从上面实验内容中选一题写实验报告书。图 9-4 实验 9.4 界面vb6.0 高级程序设计实验报告书29 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验

21、报告书30 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书31 实验十文件操作一、实验目的1掌握文件的概念及其使用方法，注意顺序、随机和二进制文件各自的特点和区别；2掌握文件系统控件、文件与目录的相关函数和语句的使用；3熟悉文件在应用程序中的作用和意义。二、实验内容1设计一个运行界面如图10-1 所示的应用程序，单击“write”可以将3 个文本框中的信息用“write ”语句写入“ d:aaa.txt” ；单击“ print”可以将 3 个文本框中的信息用“ print”语句写入“ d:bbb.txt ” 。要求 3 个信息写在同一行。程序运行

22、后，用“记事本”同时打开“d:aaa.txt”和“ d:bbb.txt”，比较它们结构有何不同？为什么？试说明“write ”和“ print ”语句的相同和不同。2如图 10-2 所示，建立一个最简单的文本编辑器。文件的打开和保存可使用某一固定文件，例如，“d:test.txt”。3编写一图片浏览器，如图10-3 所示，要求当单击某图形或图像文件后在图像框中显示该图形或图像，文件列表框中应只显示.bmp、.jpg 、.wmf、.ico 、.gif等几种常见类型的图形或图像文件。4建立一个简易学生管理系统，如图10-4 所示，用于输入、显示和修改学生的相关信息。数据按随机访问模式存放。提示：随

23、机文件的记录利用type 定义，字符串类型必须制定长度。图 10-2 实验 10.2 界面图 10-1 实验 10.1 界面vb6.0 高级程序设计实验报告书32 三、 实验报告书从上面实验内容中任选一题写实验报告书。图 10-3 实验 10.3 界面图 10-4 实验 10.4 界面vb6.0 高级程序设计实验报告书33 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：输入数据：输出结果：vb6.0 高级程序设计实验报告书34 实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书35 实验十一数据库设计一、实验目的1熟悉数据控件和控件的常用属性以及数

24、据绑定的方法；2掌握数据控件和控件访问关系数据库的方法；3灵活运用数据控件和控件以及可绑定控件实现关系数据库的访问。二、实验内容1通过“ microsoft access”和 vb6 中的“可视化数据库管理器”分别建立数据库 stud.mdb，其中包括数据表student，该表的结构如表11-1，并输入三条记录。表 11-1 字段名类型长度学号string 7 班级string 8 姓名string 8 性别string 2 年龄integer 出生日期date/time 婚否boolean 简历备注2利用数据库记录集的操作方法实现显示、修改、添加和删除记录的功能。程序界面如下图所示。图 11

25、-1 实验 11.2 界面三、 实验报告书vb6.0 高级程序设计实验报告书36 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书37 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书38 实验十二多媒体控件的使用一、实验目的1掌握常用图形控件的应用；2掌握常用图形方法的应用；3掌握媒体播放控件的应用；4掌握进度条控件的应用。二、实验内容1设计一个“画板”程序，利用“颜色”按钮，可选择颜色，画笔的粗细用单选按钮实现，界面如图12-1。图 12-1 实验 12.1 界面2设计一个“音乐播放器”，该

26、播放器应具有如下功能：（1）通过对话框选取音乐文件；（2）播放、暂停、停止、重复播放音乐文件；（3）显示音乐文件的名称、总的播放时间和当前已经播放的时间；（4）通过进度条动态显示播放进程；（5）鼠标点击进度条可控制播放进度。三、 实验报告书从上面实验内容中选一题写实验报告书。vb6.0 高级程序设计实验报告书39 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书40 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书41 实验十三程序设计中的相关算法一、实验目的1对课程中学到的各种算法进行设计；2

27、对设计的算法使用程序实现；3程序实现的过程中尽量使用过程；4不需要较为复杂的界面，能够实现功能即可。二、实验内容1用 inputbox 函数输入10 个任意整数，按从大到小的顺序输出。2判断某个数或某个范围内的数是否为素数。3已知矩阵a（3， 3）和 b（ 3，3）用随机函数产生，实现两者相加、相减、相乘。4利用数组进行选择排序和冒泡排序。5编一个将二进制数转换成十进制数的函数tranbtod(str$) 。将函数分别放在标准模块和窗体模块中，在窗体中编写调用程序，输入、输出结果分别使用文本框，程序界面自定。三、 实验报告书从上面实验内容中选一题写实验报告书。vb6.0 高级程序设计实验报告书

28、42 实验报告书日期：年月日周次：星期：成绩：实验题目程序思想：程序清单：vb6.0 高级程序设计实验报告书43 输入数据：输出结果：实验中出现错误及处理方法：教师评语教师：vb6.0 高级程序设计实验报告书44 实验十四项目实践 -五子棋软件设计一、实验目的1 通过五子棋软件设计或者自拟题目设计，巩固本课程所学的各个章节重点知识；2通过开发一个较大的系统，增强软件开发能力；3通过调试系统，增强逻辑思维能力；二、实验内容1基本要求：（1）输入两个对手名字，然后进入游戏界面。（2）用鼠标点击的方式在棋盘上摆放棋子，黑白交替。（棋盘 15*15）（3）可以悔棋。（4）五子连在一起的时候能判断胜利，

29、并且显示出胜利者的名字。（5）能够将棋局的结果保存，保存该棋局结束的状态、对手名字、棋局名字 （棋局名字在保存时由用户在相应的界面下添入）（此功能要求用数据库和文件两种技术实现）。（6）棋局能够恢复，即重新打开，打开后出现棋局结束的状态、对手名字（此功能要求用数据库和文件两种技术实现）。2其它要求：（1）界面友好、漂亮。（2）程序尽可能无bug。（3）程序健壮性强，基本上达到无论用户如何操作，软件都不出错，都有相应的处理方法。3设计步骤（1）首先做界面界面包括几个窗体，窗体上有相应的控件；因为需要画棋盘，所以必须有图形容器，这里用picturebox框；第一个窗体是登陆界面，因为玩家姓名需要在

30、程序中不断变换，因此需要将玩家名定义成两个变量，又因为这两个变量在几个窗体中都用到，所以在模块中定义为全局变量；当五子棋主界面启动之后，首先系统要自动绘制棋盘：思路：用直线绘制棋盘-直线是由点绘制的- 每个点都有坐标-改变坐标系为用户坐标系用户坐标系的定义要在窗体启动时实现。（2）坐标系的两个顶点坐标的确定考虑到五子棋15*15，确定棋盘坐标系顶点为(-8, 8)，(8, -8) （3）棋子的绘制与存储棋子的绘制用实心圆模式，颜色为黑色及白色两种。vb6.0 高级程序设计实验报告书45 棋子在内存中的存储方式：因为表示各个棋子的数据类型都相同，所以考虑用数组存储，因为棋盘是二维的，因此棋子用二

31、维数组a 存储。 a(i,j)表示用户坐标（ i,j）的棋子状态，0 表示此处无棋子，1 表示此处为黑子，2 表示此处为白子，下棋初始时，棋盘所有位置的初始状态都为0 （4）下棋子的步骤鼠标点击棋盘交叉点附近的位置，系统应实现自动识别鼠标点击位置附近的交叉点解决方法：坐标系的变换已经将棋盘交叉点坐标整数化，因此系统所需要实现的功能即是将鼠标所点击的位置坐标化为整数即可，例如将（6.2, -5.3 ）变成（6, -5） 。在交叉点上交替下黑白棋子。解决方法：定义一个逻辑数据类型变量blackwhite，该变量的值为真时下黑子，为假时下白子，每下一个棋子，该变量的值都要取反（not ） 。（5）判

32、断赢棋每次下子时都必须进行赢棋判断，判断的依据是5 个子按照横线、竖线或斜线连成一行。解决方法： 2 层循环。当有一方胜利时，棋局结束，此时在棋盘上继续点击，将不再下棋。解决方法：设置一个逻辑变量wuziqi ，其值为真时说明棋局没有结束，可以在棋盘上放棋子，该值为假时，说明该棋局结束，不能放棋子。（6）五子棋保存棋局思路： 保存棋局的功能即把内存中与棋局相关的数据（棋局名称、棋子位置、棋子颜色、棋局状态（即棋局是否结束）存入外存中，以便以后能够恢复棋局。保存的实现用两种技术实现：文件和数据库。采用数据库技术实现棋局保存：数据库设计：数据表字段：棋局名、x 坐标、 y 坐标、该点状态值、下棋状态。每条记录表示棋盘上一个存储的点的信息。要实现用数据库保存数据，就必须使程序连接到数据库上，这里用的是data控件，通过在程序中对data 控件属性的设置来连接数据库、数据表。首先判断如果输入的棋局名和当前记录的棋局名相等，说明表中有输入棋局名对应的棋局信息，将其删除，判断过程是将用户输入的棋局名（字符串）从记录集（即表）的棋局字段顶端至下逐一比较在表的最后，也就是最后一