一Visual Basic程序设计实验教学大纲

1、一、Visual Basic程序设计实验教学大纲课程编号：16900005 课内总学时：36 学分数：3授课对象：经济与管理学院工商管理、国际贸易、会计专业本科课程类别：专业基础必修课英文译名：Visual Basic Program design一、教学任务和目的计算机语言程序设计是经济与管理专业本科生的专业基础必修课。该课程为进一步利用计算机结合本专业的特点进行数据处理与软件设计打下基础。通过该课程的学习，要求学生掌握VB的语言结构及开发环境，程序设计方法与基本数据结构，调用已有控件与函数的步骤；通过上机实践培养学生分析具体问题，建立数学模型，用VB解决实际问题的能力。二、教学基本要求：1

2、、 了解计算机处理信息的过程以及描述用计算机解决问题的表示方法。2、 了解VB程序设计的开发环境。3、 掌握常用数据类型、运算对象、运算符与表达式。4、 掌握常用函数及面向对象程序设计基本概念。5、 掌握编制VB应用程序应遵循的规范和程序设计的方法。6、 熟练掌握结构化程序控制的3种基本结构，并能熟练编写程序。7、 熟练掌握子程序、函数过程设计与参数传递的方法。8、 掌握控件的选用与操作。9、 了解数据库与文件的基本操作。10、 具有用VB语言解决基本应用问题的能力，并对现有VB应用程序能进行编辑、编译、调试和运行。三、教学内容实验一 VB应用程序的创建（4学时）1、 实验目的和要求：（1）

3、熟悉VB6.0的集成环境及其基本操作。（2） 掌握一个VB应用程序的组成及创建方法。（3） 了解面向对象编程的机制及编码过程。2、 实验内容： 窗体Font属性的设置。 窗体FontSize、Width、Height等属性用程序代码实现修改。 常见窗体方法的使用：实验1：上机调试教材P19例1-1、例1-2完成教材P24习题四 实验2：编制程序并上机调试教材P26习题一的四大题的2、3两题。设计一程序，在文本框中输入字符串，单击命令按钮，在文本框中输入的内容以黑体字显示在标签上，程序设计和运行界面如图所示。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存6

4、4M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。 实验二 顺序结构程序设计（2学时+课外学时）1、实验目的和要求：（1）掌握VB6.0的数据类型、常量、变量、运算符和表达式。（2）掌握VB6.0的常用函数的使用。（3）进一步理解VB应用程序的编程机制。2、实验内容（1）上机调试教材P32例2-3 ，要求理解Print语句的输出格式。（2）定义二个变量，交换后输出。（3）已知Rnd函数产生一个（0，1）间的单精度随机数，用此函数产生一个两位随机数后，反向输出。（4）把自己的姓名在窗体上反向输出。（5）在窗体

5、上放一按钮（个人简历），单击后输出个人简历的内容：（姓名、年龄、身高、体重等。）3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验三 选择结构程序设计（2学时+课外学时）1、实验目的和要求：（1）掌握逻辑表达式、关系表达式的正确书写。（2）掌握IF语句及IF语句的嵌套应用。（3）掌握Select Case语句的使用。（4）掌握赋值语句、用户交互函数InputBox与MsgBox的使用。2、实验内容（1）用InputB

6、ox函数输入3个任意整数，按从大到小的顺序输出。（2）根据不同的输入的X的值，计算分段函数y的值。（3）用INPUTBOX函数输入一个分数，若大于90，提示“优秀”，80，89为“良好”，70，79为“中等”，60，69为“及格”，小于60为“不及格” (提示：Case语句)3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验四 循环结构程序设计（4学时+课外学时）1、实验目的和要求：（1）掌握ForNext语句及Ex

7、it For语句的使用。（2）掌握DoLoop循环语句与Exit Do语句的使用。（3）了解WhileWend语句的使用。（4）掌握循环结构的嵌套使用。2、实验内容（1）判断某个数或某个范围内的数是否为素数。（2）编程：设某班有10人，求他们计算机课程考试的平均分（10人计算机成绩用InputBox()函数输入）。（3）编程，在窗体上输出九九乘法表。（用Inputbox函数输入原串与子串，若子串在原串中，用Msgbox函数告诉子串的起始位置及取几个字符（中途退出）；若不匹配，提示不匹配。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2G

8、B以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验五 数组的应用（2学时+课外学时）1、实验目的和要求：（1）理解和掌握定长数组、动态数组的定义和使用，理解控件数组。（2）掌握定长数组和动态数组的使用差别。（3）掌握应用数组，解决与数组有关的常用算法。2、实验内容（1）已知矩阵A（3，3）和B（3，3）用随机函数产生，实现两者相加、相减、相乘。（2）利用数组进行选择排序和冒泡排序。（3）编程：运行时单击“开始”命令按钮后，在图片框内打印如图所示的图形，并且“开始“命令按钮为不可操作，“退出”按钮才显示出来，单击“退出”命令

9、按钮结束程序运行。 A BBB CCCCC DDDDDDD EEEEE FFF G3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验六 函数过程和SUB子过程（2学时+课外学时）1、实验目的和要求：（1）掌握函数过程及子过程的定义方法。（2）掌握函数过程及子过程的调用方法及形参与实参的对应关系。（3）掌握“值传递”和“地址传递”的传递方式。（4）掌握标准模块的使用，理解标准模块和窗体模块的区别。（5）了解递归概念和使

10、用方法。2、实验内容（1）用随机函数产生20个两位数的整数，存于4行5列的二维数组中，并求出其中的最大元素及它的行、列坐标，将数组按行（矩阵形式）输出到窗体，最大元素及行、列下标输出在数组的下方。（2）编写判断某个数是否为素数的的函数或子过程。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验七 变量和过程的作用域（2学时+课外学时）1、实验目的和要求：（1）理解过程级、模块级和全局级变量的有效范围。（2）理解过程的

11、作用范围。（3）理解静态变量的概念及变量的生存期。 2、实验内容（1）编制一个程序，将统计输入密码次数的变量定义为窗体变量和局部变量的区别。（2）编一个将二进制数转换成十进制数的函数TranBtoD(str$)。将函数分别放在标准模块和窗体模块中，在窗体中编写调用程序，输入、输出结果分别使用文本框，程序界面自定。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验八 基本控件和多重窗体（4学时）1、实验目的和要求：（1

12、）掌握窗体、命令按钮、标签和文本框的常用属性、基本方法和主要事件。（2）掌握多重窗体的程序设计方法。（3）熟悉VB中设置焦点的方法。（4）了解控件数组的使用方法。2、实验内容（1）利用窗体一输入密码，密码最多输三次，密码正确进入第二个窗体。（2）建立1个文本框用于输入口令（显示为“*”，按回车键作为结束）、1个命令按钮（标题为“进入”）。运行时，“进入”按钮不能响应，直到输入的口令正确时才响应。输入口令时，有相应的提示信息。当单击“进入”按钮时，打开Windows自带的计算器（calc.exe）。（3）利用随机数产生一个1100之间的随机整数，最多可猜10次，在10次之内太大或太小给出提示信息

13、，超过10次程序结束运行。（4）设计一个可以进行四则运算的计算器。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验九 基本控件和自定义对话框（2学时+课外学时）1、实验目的和要求：（1）掌握单选按钮、复选框、框架、滚动条、列表框、组合框和时钟控件的常用属性、基本方法和主要事件。（2）掌握VB中设置字体的方法。（3）熟悉设计用户自定义对话框的一般方法。2、实验内容（教材P136程序设计题）（1）使用单选按钮实现时间和

14、日期的单选。利用组合框按年月日的次序选择日期的格式。（2）利用文本框、列表框和四个命令按钮实现英文单词的添加、删除、全部删除和退出四个功能。（3）利用单选按钮和文本框编制一个进制转换的应用程序。（4）利用三个组合框编制一个简单的选择学校院系的应用程序。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验十 键盘和鼠标事件（选）1、实验目的和要求：（1）掌握键盘事件KeyPress、KeyDown和KeyUp的基本用法。

15、（2）掌握鼠标事件MouseDown、MouseUp和MouseMove的基本用法。（3）熟悉在文本框控件中定位插入点的基本方法。2、实验内容（1）从键盘上任意输入一条英文句子，将句子中的每个单词的首字母变成大写。（2）编写一个加密程序。（3）编写一个实现，当鼠标在窗体上移动，显示鼠标是当前坐标，单击鼠标及按Shift、Ctrl、Alt键，显示Shift和Button参数的值。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0

16、软件。实验十一图形操作（4学时）1、实验目的和要求：（1）掌握常用图形控件的应用。（2）掌握窗体（图片框自定义）坐标系的方法。（3）掌握常用图形方法的应用。2、实验内容（1）编程以毫米为刻度单位、以窗体中心点为坐标原点，以窗体的高与宽中最小值的1/3为半径画一个圆（轮廓线为黄色，线粗2mm，蓝色填充）。（2）编程，以缇为窗体刻度的初值、窗体中心点为坐标原点，在列表框中选取刻度的其他单位的同时画一个半径为50个单位的圆，观察圆的大小的变化。（3）在窗体中央绘制正弦曲线。（4）设计一个画板程序，利用“颜色”按钮，可选择颜色，画笔的粗细用单选按钮实现。3、实验主要仪器设备及材料 微型计算机（CPU为

17、Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验十二 菜单设计与通用对话框（4学时）1、实验目的和要求：（1）掌握菜单编辑器的使用方法。（2）熟悉菜单事件的编程方法。（3）掌握通用对话框控件的基本用法。（4）了解剪贴板对象的基本用法。2、实验内容（1）编制Command1的Click事件过程：调用“打开文件对话框”（通过控件CommonDialog1）选择文件，将所选的文件名追加到列表框控件List1中。（2）编制Command1的Click事件过程：调用“另存

18、为对话框”（通过控件CommonDialog1）选择文件，将所选的文件名追加到列表框控件List1中。（3）设计一个图片浏览器，使用LoadPicture函数装入图片。（4）设计一个菜单，利用一个形状控件，可选择基本图形、填充方式、填充颜色。（5） 前面的实验汇总为一个工程，每个菜单项代表一个实验，每个子菜单代表实验中的一个小题。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验十三文件操作（4学时）1、实验目的和要

19、求：（1）掌握文件系统控件（文件列表框、目录列表框、驱动器列表框）的应用。（2）了解顺序文件、随机文件、二进制文件的概念。（3）掌握顺序文件的打开、关闭和读写的基本操作。2、实验内容（1）由文件列表框、目录列表框、驱动器列表框编制一个用于删除选定文件的应用程序。（2）利用文件系统控件、组合框、文本框，制作一个文件浏览器，组合框选择文件类型。（3）编写程序，输入若干个学生的姓名、出生年月、两门统考课程（外语、计算机），存入磁盘文件d：student .dat（可以用记事本打开，观察运行结果的正确）。（4）假设有两个文本文件A1.txt和A2.txt，编一程序实现两个文件的合并，即将文件A2.tx

20、t连接到文件A1.txt后面，然后把文件A2.txt删除。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验十四 VB数据库编程基础（选）1、实验目的和要求：（1）熟悉数据库的基本概念。（2）掌握VB数据管理器的使用方法。（3）掌握常用数据控件的基本用法。（4）了解在VB中使用结构化查询语言SQL的方法。2、实验内容（选做）（1）在窗体上放置合适的多个数据绑定控件和数据控件。 （a）单击数据控件的移动记录按钮时，显示

21、当前记录所代表学生的个人信息。 （b）显示该学生所学的全部课程的信息。（2）在窗体上建立组合框Combo1、文本框Text1、表格控件DBGrid1和数据控件Data1。（a）在Combo1中显示3项：“全部显示”、“按姓名查询”。（b）如果“全部显示”，则在DBGrid1中显示“学生”表全部记录，并且Text1不允许输入信息。（c）如果Combo1中选择“按学号查询”，则在Text1中输入待查询学生的学号，输入完毕后按回车键后在DBGrid1中显示该学生记录或显示“查无此人”。（d）如果Combo1中选择“按姓名查询”，则在Text1中输入待查询学生的姓名，输入完毕后按回车键后在DBGrid

22、1中显示该学生记录或显示“查无此人”。（3）在窗体上建立多个数据绑定控件、一个数据控件Data1和文本框。 （a）在列表框List1中显示所有课程名，在列表框List2中显示所有专业名。 （b）选择列表框List1中的某门课程后，显示学习该课程学生的各个成绩档次的统计人数（优、良、中、及、差）。 （c）选择列表框List2中的某个专业课程后，显示该专业学生奖学金的总数和平均数、以及获得奖学金的人数比例。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监视器），装有Windows 2000操作系统，Vis

23、ual Basic 6.0软件。实验十五多文档界面与工具栏设计（选）1、实验目的和要求：（1）掌握简单的多文档界面（MDI）的应用程序设计方法。（2）了解ToolBar控件的使用。（3）了解手工创建工具栏的基本方法。2、实验内容（1）建立一个包含两个子窗体的MDI窗体，在子窗体上分别设置命令按钮，实现两子窗体显示和隐藏的切换。（2）建立一个包含两个子窗体的MDI窗体，在两子窗体中各建立文本框，可以进行文字编辑，建立菜单命令实现窗体间文本的复制和移动操作。3、实验主要仪器设备及材料 微型计算机（CPU为Pentium 166MHz以上，内存64M以上，硬盘为2GB以上，VGA或更高分辨率的彩色监

24、视器），装有Windows 2000操作系统，Visual Basic 6.0软件。实验十六程序调试和出错处理（选）1、实验目的和要求：（1）了解VB程序调试工具的主要特性及常见的错误类型。（2）掌握VB应用程序调试和排错的一般方法。（3）掌握简单的错误处理程序的编写。2、实验内容（1）分别用文本框、2个组合框输入某一天的年、月和日，计算出这一天是该年的第几天。（2）设计一个字符串查找函数Search（Txtst$，St$，p%），要求对文本框Text1中的文本从p位置开始查找一给定的字符串st。若找到则返回所找到的位置，否则返回结果为0。在标准模块调用子程序，调试已有的部分程序实现。（3）用随机函数产生20个3位整数，将其写入顺序文件D：.abc.txt中，再将文件中的数取出按从大到小顺序输出到屏幕上。在标准模块调用子程序，调试已有的部分程序实现。3、实验主要仪器设备及材料 微型计算机