《可视化程序设计》实验指导书

1、实验一 程序界面设计实验1实验目的通过本次实验：（1）掌握启动VB的方法；（2）熟悉VB的集成开发环境；（3）掌握开发VB应用程序的一般步骤；（4）掌握已有VB工程的打开方法；（5）掌握程序界面的设计以及控件属性的设置方法；（6）初步了解VB程序代码的编写方法。2实验内容（1）在窗体上添加一个组合框，通过属性设置窗口在组合框中加入“外语类图书”、“计算机类图书”、“管理类图书”和“电子类图书”四个列表项。运行程序，单击不同的列表项，观察组合框的文本框中显示的内容有什么变化。计时器图1.1 文字移动程序图1.1标签（2）设计一个文字在窗体上由左向右滚动的的程序。程序界面设计可参考图1.1。属性设

2、置可参考表1.1。界面设计完成以后，可参考下列程序代码段在代码编辑器中编写程序代码。Private Sub Form_Load() Label1.FontSize = 20 Label1.FontName = 隶书End SubPrivate Sub Timer1_Timer() Label1.Left = Label1.Left +100 If Label1.Left form1.Width Then Label1.Left = - Label1.Width End IfEnd Sub 表1.1 属性设置对 象属 性属 性 值窗 体NameForm1Caption计时器应用举例标 签Name

3、Label1Caption教学管理系统计时器NameTimer1Interval200（3）参考图1.2设计学生注册程序界面，并编写简单程序代码，实现单击“注册”按钮时将输入的信息添加到列表框中。设计程序界面和进行属性设置时，工具栏中命令按钮上的图标可通过按钮的“Style”和“Picture”属性进行设置，所有对象的名称属性均可采用默认值。向列表框中添加信息可利用列表框的“Additem”方法实现，编写程序代码时可参考下列代码：Private Sub Command1_click()List1.AddItem Txt1_xingming.Text & & Txt1_xingbie.Text

4、& _ & Txt1_dizhi.Text & & Txt1_youbian.Text & _ & Txt_xibu.Text & & Txt1_banji.Text & _ & Txt1_xuehao.Text 向列表框中添加列表项End Sub图1.2 学生注册程序界面3实验要求（1）按题目要求设计程序界面、编写程序代码并保存工程；（2）对程序进行编译运行，观察运行结果；（3）在实验报告上写出程序设计的主要步骤。4实验记录实验二 分支循环程序设计实验1实验目的通过本次实验（1）掌握顺序结构、分支结构、循环结构；（2）掌握VB中的分支语句（If 与Select语句）的格式与应用；（3）掌握V

5、B中循环语句（For 与 While语句）的格式与应用。2实验内容：（1） 设计一个程序求圆的周长和面积。要求程序运行时单击窗体上的命令按钮后，弹出InputBox函数对话框，在对话框中输入圆的半径后，单击对话框中的“确定”按钮，窗体上的两个文本框分别输出圆的周长和面积。（2）设计一个程序求下列分段函数的值。程序运行时通过文本框输入x的值，单击命令按钮，在另一个文本框中输出y的值。 x+2.5 (x2)y = 21.5(x3)2 (2x4) 1.5 (x4)（3）设计程序根据奖金和扣税标准计算实得奖金数。下表中a代表奖金，r代表税率。程序运行时通过文本框输入奖金，单击命令按钮，在另一个文本框中

6、输出实得奖金数。a500(元)r=0%500a1000r=3%1000a2000r=5%2000a1），直到最后一项小于10-4为止。程序运行时通过文本框输入x的值，单击命令按钮，在另一个文本框中输出y的值。3实验要求（1）按题目要求设计程序界面、编写程序代码并保存工程；（2）在实验报告上画出所设计的程序界面；（3）在实验报告上写出所编写的程序代码；（4）编译运行程序，并在实验报告上记录运行结果。4实验记录实验三 数组程序设计实验1实验目的通过本次实验（1）掌握一维、二维数组定义与引用；（2）掌握动态数组、控件数组的定义与引用；（3）掌握数组元素的输入与输出方法。2实验内容：（1） 参考图3.

7、1设计程序，实现在图片框中输出一个5*5的二维数组，同时在文本框中对应输出二维数组各列的和。二维数组元素的值通过随机函数Rnd产生。图3.2 运算器程序界面图3.1 二维数组输出程序界面（2） 参考图3.2用控件数组设计一个可以进行加、减、求平方与求平方根的计算器，设计时将图中“/”和“*”按钮的Caption属性分别改成“平方”和“平方根”。3实验要求（1）按题目要求设计程序界面、编写程序代码并保存工程；（2）在实验报告上写出所编写的程序代码；（3）编译运行程序，并在实验报告上记录运行结果。4实验记录实验四 过程与函数设计实验1实验目的通过本次实验（1）掌握函数与过程的定义格式与调用方法；（

8、2）理解函数与通用过程参数的两种传送方式；（3）掌握用通用过程对数组进行排序、求最值的方法。（4）掌握事件过程的定义与调用；（5）掌握调用其它模块中过程的方法；（6）掌握对象作为参数的过程定义与调用方法。1实验内容（1） 参考图4.1设计以窗体和控件对象作为过程参数的程序，要求单击“控件参数”按钮时，文本框的背景色变成兰色，单击“窗体参数”按钮时，显示窗体2和隐藏窗体1的同时，将窗体2的标题改为“调用示例”，单击“返回窗体1”按钮时，显示窗体1的同时隐藏窗体2。 图4.1 窗体和控件作为过程参数的程序件（2）设计程序利用Array函数创建一个由10个数组元素组成的一维整形数组并赋值，然后使用F

9、or EachNext语句将数组元素在文本框1中输出，接着调用自定义排序函数，将排序后的数组元素在文本框2中输出。调用求和函数，将数组元素和在文本框3中输出。（3）参考图4.2设计程序，通过分别调用定义在标准模块和另一个窗体模块中的自定义函数进行乘法运算。图4.2 乘法运算程序界面3实验要求（1）按题目要求设计程序界面、编写程序代码并保存工程；（2）在实验报告上写出程序设计的主要步骤；（3）在实验报告上写出所编写的程序代码；（4）编译运行程序，并在实验报告上记录运行结果。4实验记录实验五 单文档编辑器、多文档学生档案管理系统菜单设计1实验目的通过本次实验（1）掌握使用菜单编辑器设计下拉式菜单的

10、方法；（2）用PopupMenu方法设计弹出式菜单；（3）掌握用ToolBar与ImageList设计工具栏的方法；（4）掌握用StatusBar控件设计状态栏的方法；（5）掌握用CommonDialog控件设计通用对话框的方法；（6）学会单文档编辑器设计；（7）学会多文档MDI学生档案管理主界面设计方法。2实验内容：（1）在e:vbxscjgl目录中创建学生成绩管理系统工程文件xscjgl.vbp，窗体文件名为Form_XSCJ.frm。在窗体内设计下拉式菜单，菜单内容如表5.1所示。表5.1 学生成绩管理系统主菜单退出数据录入数据查询数据统计数据打印系统维护退出学生成绩初始化班级成绩查询学

11、生成绩统计班级成绩打印课程代码表维护学生成绩录入个人成绩查询补考成绩统计补考成绩打印数据编码表维护补考成绩录入补考成绩查询班级课程打印用户管理班级课程录入班级课程查询（2）在（1）题的学生成绩管理系统中添加工具栏，在工具栏上添加八个按钮，分别用于退出、录入、查询、统计、打印、维护、文本编辑和音乐子窗体的快速调用。（3）在（2）题的学生成绩管理系统中添加状态栏，状态栏共有4个窗格，分别显示当前光标的坐标位置（x、y）、单击工具栏按钮的名称、插入状态、日期与时间。图5.1 单文档编辑器设计示例（4）按图5.1要求设计一个功能类似记事本的单文档编辑应用程序，包含主菜单、工具栏、状态栏与对话框。该单文

12、档编辑器应具有打开文件、保存文件、打印文件，设置文本字体、颜色的功能。工具栏按钮应具有文本剪切、复制与粘贴等项功能。状态栏能分别显示当前光标的坐标位置（x、y）、文本编辑器的状态（编辑或只读）、插入状态、日期与时间等信息。（5）设计学生档案管理系统的MDI主窗体与五个子窗体界面，要求如下。 在VB中新建一个工程，在其中添加一个MDI窗体，将MDI窗体设为启动窗体，并在该窗体内建立学生档案管理系统主菜单（见表5.2）。表5.2 “学生档案管理”窗体的主菜单校历学生档案录入学生档案查询学生档案统计学生档案打印系统维护窗口校历管理学生档案录入学生档案查询(组合)学生档案统计学生档案打印系部代码维护层

13、叠退出(&E)学生宿舍录入(ADO对象)学生档案查询(树形)获奖学生统计学生宿舍打印班级代码维护(Data)平铺学生宿舍录入(Adodc)学生档案查询(分页)学生奖惩打印班级代码维护(Adodc)垂直分隔线分隔线学生注册打印课程编码维护排列学生奖惩录入学生奖惩查询分隔线分隔线分隔线班级代码查询班级报表打印文本编辑器学生注册分隔线多媒体播放器学生注册查询用户账号维护 向工程内添加5个子窗体Form1Form5，将这五个窗体均设置为子窗体，窗体名改为Form_XSDA11FormXSDA51，分别代表校历管理学生档案打印。在主窗体中编写程序调用上述五个子窗体。 向主窗体内添加工具栏，工具栏上放置8

14、个按钮，如图5.2所示。前5个按钮要能调用5个子窗体。图5.2 学生档案管理主菜单设计界面 向主窗体内添加状态栏，在状态栏上添加3个窗格，第一个窗格用于显示光标坐标值（x，y），第二个窗格用于显示当前被激活的窗体信息，第三个窗格用于显示当前的日期与时间。3实验要求（1）写出程序设计主要步骤；（2）写出所使用控件的属性设置；（3）写出主要事件处理过程；（4）写出程序使用说明。4实验记录实验六 用可视化数据管理器建立数据库、数据表、增加与删除记录、SQL语句实验1实验目的通过本次实验（1）掌握可视化数据管理器的基本使用方法；（2）初步掌握Select语句的格式与使用方法；（3）初步掌握Insert

15、语句的格式与使用方法；（4）初步掌握Update语句的格式与使用方法；（5）初步掌握Delete语句的格式与使用方法；（6）学会用数据窗体设计器设计班级编码维护程序。2实验内容（1）在e 盘上建立学生档案管理系统数据库文件目录e:vbdata。（2）用可视化数据管理器在e:vbdata目录中建立Access类型的数据库xsdagl.mdb。（3）在可视化数据管理器中打开数据库文件e:vbdataxsdagl.mdb，在数据库窗口中进行如下操作：建立班级编码表TB03并录入数据，表结构见表6.1，录入数据见表6.2。 表6.1 班级编码表结构序号字段名含义类型宽度小数主键关联字段/显示字段1TB

16、0301 班级编码Text10Y2TB0302 班级名称Text203TB0303 入学年份Text44TB0304 专业编码Text10TB0401/TB04025TB0305 学制Text16TB0306班级人数Integer307TB0307 班主任Text108TB0308 毕业标志Text1TC0401/TC04029TB0309 系部编码Text10TB0601/TB0602 表6.2 班级编码表部分记录TB0301TB0302TB0303TB0304TB0305TB0306TB0307TB0308TB0309计算机30121200133344299130计算机3013120011

17、2331348130计算机30231200212334122130计算机30221200233332119130网络30231200242336366130管理40231200245332211140（4）将光盘中的数据库xsda.mdb复制到e:vbdata中，在可视化数据管理器中打开该数据库，在SQL窗口中输入习题5.5中的SQL语句，执行SQL语句观察运行结果。（5）在xsdagl.vbp工程中设计班级编码维护窗体程序。要求： 用数据窗体设计器为学生档案管理系统建立班级编码表TB03的维护窗体界面Form_XSDA62。 在主窗体MDIForm_XSDA中编写调用Form_XSDA62的

18、子菜单处理过程。3实验要求（1）用可视化数据管理器建立数据库与数据表，录入与编辑数据记录；（2）编写SQL语句；（3）在VB的可视化数据库管理器输入SQL语句；（4）执行SQL语句，观察执行结果；（5）用数据窗体设计器设计班级编码维护程序；（6）在实验报告上写出所编写的SQL语句以及运行结果。4实验记录实验七 使用数据控件Data设计数据库应用程序1. 实验目的（1）掌握用数据控件Data连接数据库、数据表的方法；（2）掌握数据界面控件TextBox控件、Label控件、DBGrid 控件、DBCombo控件、DBList控件的属性及使用方法。（3）学会用DBCombo控件、DBList控件解

19、决主从表的数据录入问题；（4）学会编写一个数据代码表的编辑程序。2. 实验内容（1）用Data数据控件设计专业编码表TB04（表结构参见表7.1）的维护程序，该程序能录入、显示、修改、删除专业编码表TB04的记录内容。程序界面如图7.1所示。窗体名为Form_ex61，工程文件名为ex6_1.vbp。表7.1专业课程编码表结构序号字段名含义类型宽度小数主键关联字段/显示字段1TB0401 专业编码Text10Y2TB0402 专业名称Text304TB0403 系部编码Text10TB0601图7.1 专业编码维护程序界面（2） 用Data数据控件在学生档案管理系统工程（xsdagl.vbp）

20、中建立课程编码表TB01（表结构参见表7.2）维护程序，程序界面参见图7.2，程序设计要求如下：表7.2课程编码表结构序号字段名含义类型宽度小数索引数据来源 取值范围引用字段1TB0101 课程编码Text10K录入2TB0102序号Text4自动生成3TB0103 课程名称Text30录入5TB0104 课程类别Text1选择TC01016TB0105五笔码Text6录入7TB0106拼音码Text6录入8TB0107初始学分Text4录入 工程文件xsdagl.vbp中添加一个课程编码维护子窗体（Form_XSDA64），主菜单能调用Form_XSDA64窗体。 添加工具栏与状态栏，在工具

21、栏添加退出按钮与统计按钮。按统计按钮能统计课程门数及理论课、实验课、实习课、设计课的门数，并在状态栏中显示。 用5个TextBox控件编辑课程编码、课程序号、课程名称、五笔码、拼音码5个字段内容。用DBCombo与DBList控件显示与输入课程类别码TB0104。 用DBGrid控件显示与编辑课程编码表TB01中的字段内容。图7.2 课程编码表TB01维护程序界面3. 实验要求（1）用Data数据控件设计专业编码表TB04的维护程序；（2）用Data数据控件在学生档案管理系统工程（xsdagl.vbp）中建立课程编码表TB01（见表6.14）维护程序；（3）写出以上程序设计的主要步骤；（4）写

22、出程序设计所用主要控件的属性设置；（5）写出程序设计主要事件过程代码；（6）简要写出程序的使用说明。4实验记录实验八 使用ADO Data控件设计数据库应用程序1实验目的（1）掌握ADO Data数据源控件与数据库、数据表连接的方法；（2）掌握数据显示控件DataGrid 控件、DataCombo控件、DataList控件的属性、事件及使用方法；（3）学会课程编码表维护程序的设计方法；（4）学会学生宿舍录入程序的设计方法；（5）学会学生班级查询程序的设计方法。2实验内容（1） 用ADO Data数据控件在学生档案管理系统工程（xsdagl.vbp）中建立课程编码表TB01维护程序。程序界面设计

23、参见图8.1，程序设计要求如下： 工程文件xsdagl.vbp中添加一个班级编码维护子窗体（Form_XSDA65），主菜单能调用Form_XSDA65窗体。 添加工具栏与状态栏，在工具栏添加退出按钮与统计按钮。按统计按钮能统计课程门数及理论课、实验课、实习课、设计课的门数，并在状态栏中显示。 用5个TextBox控件编辑课程编码、课程序号、课程名称、五笔码、拼音码5个字段内容。用DataCombo与DataList控件显示与输入课程类别码TB0104。 用DataGrid控件显示与编辑课程编码表TB01中的字段内容。图8.1 课程编码表TB01维护程序界面（2）使用ADO Data为数据源控

24、件，在学生档案管理系统工程（xsdagl.vbp）中编写学生宿舍录入程序。程序界面设计参见图8.2。程序设计要求如下： 在工程文件xsdagl.vbp中添加一个学生宿舍录入子窗体（Form_XSDA23），主菜单能调用Form_XSDA23窗体。 在子窗体内添加工具栏与状态栏，在工具栏添加退出与统计按钮，按统计按钮能统计班级数与学生人数。 在子窗体内添加一个DataCombo控件与两个DataGrid控件。用DataCombo控件选择系，用一个DataGrid控件选择班级，用另一个DataGrid控件录入学生宿舍号码。当用户用鼠标单击DataCombo控件下位按钮选择某系（如计算机系）时，该系

25、所有班级记录出现在DataGrid控件中，再用鼠标单击DataGrid控件中的某个班级记录，该班所有学生学号、姓名、性别、宿舍等出现在右边的DataGrid控件中，此时可录入现有学生宿舍号码。图8.2 学生宿舍录入程序界面（3）以ADO Data为数据源控件，在学生档案管理系统工程（xsdagl.vbp）中编写学生班级查询程序。程序界面设计参见图8.3，程序设计要求如下： 工程文件xsdagl.vbp中添加一个学生档案查询子窗体（Form_XSDA36），主菜单能调用Form_XSDA36窗体。 工具栏由四个快速按钮组成，功能分别为退出、查询、统计、打印。 编写一个查询过程Find()，可按系

26、部、专业、入学年份进行模糊查询，系部与专业分别用DataCombo_TB06与DataCombo_TB04控件选择，入学年份用TextBox控件输入。当三个控件中任何一个发生变化时触发Change事件，调用Find过程完成查询工作。 用TextBox控件显示班级记录各字段值，用DataGrid组件显示各班级记录值。 状态栏显示班级个数与学生人数。3实验要求（1）在VB开发环境中设计实验程序界面；（2）按实验要求编写各事件过程代码；（3）调试并运行入程序，并写出使用说明。图8.3 班级编码表查询程序界面4实验记录实验九 使用ADO对象设计数据库应用程序1实验目的（1）掌握用connection连

27、接对象打开数据库的方法；（2）掌握用recordset记录集对象打开数据表，并对数据记录进行处理的方法；（3）掌握用command命令对象执行对数据表进行操作的方法；（4）学会用ADO对象设计班级查询程序与系部编码程序。2实验内容（1）使用ADO对象设计学生班级查询程序。程序界面设计可参考图8.3，设计时用两个组合框控件Combo_TB06、Combo_TB04分别替换实验八图8.3中的DataCombo_TB06和DataCombo_TB04控件。编写程序用两个记录集对象打开系部编码表TB06与专业编码表TB04，然后将TB06与TB04中记录分别赋给Combo_TB06、Combo_TB0

28、4组合框控件。（2）用命令对象对系部编码进行修改、复制操作。程序界面设计如图9.1所示，程序设计要求如下： 编写“修改”按钮的事件处理过程，用Update语句将文本框Text1、Text2、Text3中内容替换当前记录。 编写“复制”按钮的事件处理过程，用Insert语句将TB06表中当前记录复制到TB05表中去。图9.1系部编码表维护程序界面3实验要求（1）按题目要求设计班级查询程序与系部编码表维护程序界面；（2）按题目要求编写各事件过程代码程序；（3）调试并运行班级查询程序与系部编码维护程序；（4）写出程序使用说明。4实验记录实验十 用DtaReport对象设计数据报表打印程序1实验目的（

29、1）学会用数据环境设计器设计数据库应用程序；（2）学会用DataEnvironment与DataReport对象设计数据报表打印程序。2实验内容（1）用数据环境设计器在学生档案管理系统中添加学生档案查询窗体Form_XSDA37，并设计学生档案查询程序。程序设计可参考例7.1，界面设计可参考图10.1。（2）在学生档案管理系统中添加学生档案打印预览和打印窗体Form_XSDA51，并设计指定班级的学生档案表预览与打印程序。程序界面设计如图10.1所示，报表预览界面如图10.2所示。实验步骤如下： 先将学生档案查询窗体Form_XSDA31另存为学生档案打印窗体Form_XSDA51 修改窗体属

30、性： 在工程中添加学生档案查询窗体Form_XSDA31 编写程序，在主窗体中调用学生档案打印窗体Form_XSDA51。 在环境设计器DataEnvironment_XSDA中添加命令对象Command_XA01，用SQL生成器产生学生档案查询的SQL语句。在工程中添加学生档案数据报表对象DataReport_XA01，设置属性与环境设计器DataEnvironment_XSDA、命令对象Command_XA01连接，制作学生档案数据报表。 在学生档案数据报表对象DataReport_XA01中添加日期、报表页码、总页数、当前页码，显示日期、时间、当前页码、总页数，如图10.2所示。图10.

31、1 学生档案打印程序界面 在学生档案打印窗体Form_XSDA51中删除按学号查询的标签与文本框控件（Text_No），及相应的程序代码，添加预览与打印按钮，如图10.2所示。编写预览与打印按钮事件处理程序，在程序中要用rsCommand_XA01.Open方法打开指定班级等条件的学生档案表。图10.2 学生档案报表打印预览界面3实验要求（1）根据实验要求在VB开发环境中设计学生档案查询、打印预览程序界面；（2）按实验要求编写各事件过程代码程序；（3）调试并运行学生档案查询、打印预览程序；（4）写出程序使用说明。4实验记录实验十一 用MSFlexGrid控件设计数据库应用程序1. 实验目的（1

32、）了解日期类控件的作用；（2）了解MonthView与Calendar的主要属性设置与用法；（3）了解日期类函数的调用格式与使用方法；（4）掌握MSFlexGrid控件的主要属性设置、事件过程与方法调用；（5）掌握以Data控件为MSFlexGrid控件数据源，用TextBox控件跟随MSFlexGrid控件单元格移动，实现数据录入的方法；（6）掌握用命令对象Command执行Update语句，将MSFlexGrid控件中数据写入数据表的方法。2. 实验内容（1）在例8.3的校历表程序（如图11.1所示）中，修改“添加”按钮事件过程，能自动计算出下一学期的学年与学期值，并作为新记录添加到XA0

33、4表中。要求重新设计并上机调试校历表管理程序。（选做）图11.1 校历管理程序运行界面（2） 在例8.4 学生宿舍录入程序中，用记录集对象Rs_TB06、Rs_TB03与Combo_TB06、Combo_TB03控件选择系部与班级。用记录集对象Rs_XA01打开指定班级学生记录，并将学生记录赋给MSFlexGrid控件，录入学生宿舍后再用命令对象Command执行Update语句，将学生宿舍保存到学生档案表XA01中去。要求重新设计并上机调试学生宿舍录入窗体程序（如图11.2所示）。3. 实验要求（1）根据题目要求设计校历表管理程序（选做）；（2）根据题目要求设计学生宿舍录入程序；（3）按题目

34、要求编写各事件过程代码程序；（4）调试并运行校历管理程序、学生宿舍录入程序；（5）写出程序使用说明。图11.2 学生宿舍录入程序4实验记录实验十二 用TreeView、SSTab控件设计数据库应用程序1. 实验目的（1）理解树形控件TreeView的作用；（2）掌握树形控件TreeView的属性与方法；（3）掌握树形控件TreeView添加到工具箱的方法；（4）学会用树形控件TreeView设计学生档案查询程序；（6）了解SSTab控件的作用、属性；（7）学会用分页控件SSTab设计学生档案查询程序。2. 实验内容完成例8.6的学生档案分页查询程序设计，程序界面如图12.1所示。图12.1 学生档案分页查询3. 实验要求（1）根据要求完成学生档案分页查询程序的设计；（2）按要求编写各事件过程代码程序；（3）调试并运行学生档案分页查询程序；（4）在实验报告上写出主要程序代码；（5）