Visual-Basic程序设计综合教程第6章-综合案例

1、第6章 综合案例 本章以实例的形式介绍了在程序开发中，常用控件的使用、鼠标键盘事件的应用以及多窗体程序界面设计方法和步骤。帮助读者在学习程序设计的过程中，正确理解控件，有效的设计应用程序界面。并从中掌握程序设计思想和编程技巧。【主要内容】计时器的应用-模拟秒表滚动条的应用-简易调色板图形控件以及键盘事件的综合应用-在落日中飞行单选按钮、复选框、列表框和组合框的综合应用-字体格式演示鼠标事件的综合应用-利用鼠标事件绘制直线和曲线多窗体程序界面设计-学生成绩查询系统界面设计实例一 模拟秒表实例二 简易调色板实例三 在落日中飞行实例四 字体格式演示 实例五 利用鼠标事件绘制直线和曲线 实例六 学生成

2、绩查询系统界面设计 在本例中，我们利用计时器控件模拟一个秒表：时间每变化0.01秒时，便在文本框中显示秒表走过的时间（格式为小时:分钟.秒 百分秒），程序运行后的情况如图6.1（a）所示。实例一 模拟秒表图6.1（a）程序运行后图 程序设计过程如下：（1）设计用户界面。 在窗体上创建如图6.1（b）的控件，并根据表6.1，设置各标签的属性。调整各控件的大小、位置及间距，设计好的窗体界面如图6.1（b）所示。 6.1（b） 初始用户界面 （2）编写事件代码。声明变量编写“开始”命令按钮的事件过程编写“记录”命令按钮的事件过程编写“停止并清零”命令按钮的事件过程编写计时器的事件过程 （3）运行程序

3、，验证运行结果。程序运行后，如图6.1（c）所示；单击“开始”命令按钮，秒表开始计时，同时使“开始”命令按钮不可用，激活“记录”和“停止并清零”命令按钮，如图6.1（d）所示；单击“记录”命令按钮，则将当前秒表走过的时间显示到列表框中，如图6.1（e）所示；单击“停止并清零”命令按钮，激活 “开始”命令按钮，使“停止并清零”命令按钮和“记录”命令按钮不可用。Text1中的时间变为初始值“0:0.00”，如图6.1（f）所示。 图6.1（c）程序开始运行后 图6.1（d）单击“开始”命令按钮后 图6.1（e）单击“记录”命令按钮后 图6.1（f）单击“停止并清零”命令按钮后 实例二 简易调色板

4、在本例中，我们通过三个水平滚动条(HscrollBar)来输入和改变三种基本颜色。用三个标签（Label5、Label6、Label7）的背景颜色来表现颜色的变化。水平滚动条的Change事件Scroll事件将会改变颜色的RGB值，最后通过标签（Label8）将三种颜色的混合值表现出来，达到调色和显示的目的。程序运行后的情况如图6.2（a）所示。图6.2（a）程序运行后 程序设计过程如下：（1）设计用户界面。设计步骤： 根据图6.2（b），初始化用户界面。在窗体上部画一个标签Label1，在窗体中央区域画一个框架Frame1，并在框架中分别画标签Label2、Label3、Label4，在这三

5、个标签右侧画三个水平滚动条Hscroll1、Hscroll2、Hscroll3和三个标签Label5、Label6、Label7。在框架的左下方画命令按钮Command1，在命令按钮Command1的右侧画标签Label8。并根据表6.3，设置各控件的属性。表6.3用户界面各控件属性设置控件名称（name）属性属性值Form1Caption简易调色板Label1Caption提示：可通过调色区的滚动条设置各种颜色的比例Label2Caption红色Label3Caption绿色Label3Caption蓝色Hscroll1、Hscroll2、Hscroll3Max255Min0LargeCha

6、nge10SmallChange1Label5、Label6、Label7BorderStyle1Command1Caption查看颜色混合后的效果Label8BorderStyle1（2）编写事件代码。编写水平滚动条Hscroll1、Hscroll2和Hscroll3的Change事件。 编写命令按钮Command1的Click事件。 （3）运行程序，验证运行结果。 图6.2（c）通过移动滚动块改变颜色输出 图6.2（d）单击命令按钮后显示的混合颜色程序运行后，如图6.2（c）所示，分别移动三个水平滚动条的滚动块（通过单击水平滚动条右边的移动按钮或移动滚动框），同时观察右侧标签中显示的颜色变

7、化，并调整滚动条的滚动块的位置。确定三个标签中的颜色后，单击命令按钮，则在右侧标签中显示混合颜色，如图6.2（d）所示。图6.2（c）通过移动滚动块改变颜色输出 图6.2（d）单击命令按钮后显示的混合颜色 实例三 在落日中飞行在本例中，我们建立两个图形控件ImgBack和ImgPlane，ImgBack用于显示落日的背景图片，ImgPlane用来加载飞机的图片。当程序运行后，按下键盘功能键区的方向键“”、“”、“”、“”，飞机便按照键入的方向飞行。图6.3（a）和图6.3（b）显示了当按下“”键时飞机向右飞行前后的状态。图6.3（a）程序运行后的窗体 图6.3（b）按下“”键时后的窗体 程序设

8、计过程如下：（1）设计用户界面。根据图6.3（a），初始化用户界面。根据表6.4，在属性窗口中设置窗体和图形控件image1的属性。表6.4用户界面控件属性设置 控件名称（name）属性属性值Form1Caption在落日中飞行Height3150Width4650ImgBackHeight2500Width4500StretchTrueImgPlaneHeight400Width700StretchTrue（2）编写事件代码。初始化窗体的大小和背景图像的位置和飞机的位置。 编写键盘的事件过程。 （3）运行程序，验证运行结果。 程序运行后，分别单击“” “” “” “”方向键，观察飞机在背景图

9、像中的移动。实例四 字体格式演示 本实例的思路是通过单击代表字体对齐方式的单选按钮控件，将改变标签中字体的对齐方式。选择含有字体格式、样式和大小的组合框中的某个列表项，并单击应用复选框，将改变标签中字体的属性。并将字体的属性显示在列表框中。程序设计过程如下： （1）设计用户界面。在窗体中添加如图64（a）所示的控件，其属性设置见表65。图6.4（a）“字体格式演示”初始化界面图表6.5用户界面控件属性设置控件名称（name）属性属性值Form1Caption字体格式Label1Caption字体格式演示Label2Caption爱我中华BorderStyle1Label3Caption当前字体

10、格式：List1Frame1Caption格式设置Check1(0)Caption应用字体Check1(1)Caption应用字体样式Check1(1)Caption应用字体大小Combo1Style0Combo2Style1Combo3Style1Option1(0)Caption左对齐Option1(1)Caption居中对齐Option1(2)Caption右对齐（2）编写事件代码。初始化窗体各控件，并使窗体加载后，默认选中各组合框中第一项，并在列表框中显示其内容。编写单选按钮数组Option1的Click事件代码，当某个单选按钮被选中后，将改变Label2中文字的对齐方式。编写单选按钮

11、数组Option1的Click事件代码，当某个单选按钮被选中后，将改变Label2中文字的对齐方式。编写组合框Combo2的Click事件代码，Combo2用来选择字体的样式。 编写组合框Combo3的Click事件代码，Combo3用来选择字体的大小。 编写复选框数组Check1的Click事件代码。 （3）运行程序，验证运行结果。 运行调试程序，验证单选选项按钮能否改变字体对齐方式，以及复选柜控件和列表框控件能否改变字体类型、格式和大小。其运行界面如图64（b）所示。图6.4（b）“字体格式演示”运行界面 实例五 利用鼠标事件绘制直线和曲线 在本例中，我们在指定的图片框中，通过鼠标左键的按

12、下、移动及释放，绘制连接鼠标起始位置所在点的直线；通过单击并移动鼠标，绘制鼠标移动轨迹的曲线。程序运行前、后的情况如图6.5（a）和图6.5（b）所示。图6.5（a）程序初始界面 图6.5（b） 绘制直线、曲线后程序设计过程如下：（1）设计用户界面。在窗体上创建两个标签、两个图片框和一个命令按钮。据表6.7设置各控件的属性。根据图6.5（a）调整各控件的大小、位置及间距。设计好的窗体界面如图6.5（a）所示。表6.7用户界面控件属性设置控件名称（name）属性属性值Label1Caption通过移动鼠标左键画直线Label2Caption通过移动鼠标左键画曲线Form1Caption利用鼠标事

13、件绘制直线和曲线Picture1NameP1BackColor&H00FFFFFF&Picture2NameP2BackColor&H000000FF&Command1Captiontion再画一次（2）编写事件代码。声明变量 编写图片框P1的鼠标事件过程代码编写图片框P2的鼠标事件过程代码 编写命令按钮command1的事件过程 （3）运行程序，验证运行结果。程序运行后， 在窗体靠左的图片框中任意位置按下鼠标左键，不释放鼠标左键，将鼠标移到另一位置。则绘制出一条从起点到终点的直线，如图6.5（b）所示。在窗体靠右的图片框中任意位置按下鼠标左键，不释放鼠标左键，移动鼠标，在鼠标移动的轨迹上，便

14、画出了一条的曲线，如图6.5（b）所示。实例六 学生成绩查询系统界面设计在本例中，我们将设计学生成绩查询系统的界面。其中包括登陆界面，系统信息页面，系统主界面等三个窗体。他们的关系如图所示是输入用户名，密码是否正确重新输入系统信息页面系统主界面程序设计过程如下：（1）设计用户界面。创建登陆界面。 创建系统信息页面 我们将默认的窗体Form1作为系统主页面。在form1中添加一个命令按钮，设置命令按钮的Caption属性为“进入本系统”。 根据表6.8，设置各窗体的属性表6.8用户界面窗体及控件属性设置窗体、控件名称（name）属性属性值FrmLoginname通过移动鼠标左键画直线Form1N

15、ameMainCaption欢迎使用学生成绩查询系统Fmand1Caption进入查询系统（2）编写事件代码。修改frmLogin窗体中“确定”的Click事件代码。 修改frmAbout窗体中“确定”按钮的Click事件代码 设置frmLogin窗体为启动窗体将工程保存为“学生成绩查询系统.vbp” （3）运行程序，验证运行结果。程序运行后， 在如图6.6（g）所示的登陆界面中，输入用户名“student”，密码“123456”，单击“确定”，则窗体“关于学生成绩查询系统”出现，如图6.6（h）所示。单击“确定”后，则出现系统主界面。如图6.6（i）所示。若在登陆界面中输入的密码错误时，会弹出如图6.6（j）所示的信息对话框。单击“确定”，将返回登陆界面，密码输入文本框得到焦点。允许用户重新输入密码。图6.6（i）系统主页面图6.6（j）密码错误的信息对话框图6.6（g）登陆界面图6.6