Visual Basic应用任务教程课件vb-4

第4章常用控件学习指导控件的主要功能是获取用户的输入信息和显示输出信息。本章主要介绍VB的常用控件、键盘与鼠标事件。将以12个任务来展示这些常用控件在程序设计中所起的作用，并让大家学会这些控件的用法。

【任务1】图形输出与美化效果描述

程序的界面都是需要美化的，那么就需要用到图形控件来美化界面。窗体上有六个形状控件，六个标签控件以及“设置形状”、“填充线条”、“设置颜色”和“退出”四个命令按钮。当单击“设置形状”命令按钮时，六个形状控件分别显示不同的形状;当单击“填充线条”命令按钮时，六个形状控件分别在图形中填充不同的线条，效果;当单击“设置颜色”命令按钮时，六个形状控件分别在图形中填充不同的颜色。设计分析

本任务用到了形状控件，它的主要作用是能够使程序的界面更有美感。任务中的中六个形状控件和六个标签控件应使用控件数组创建，界面中不同的图形可通过设置形状控件的Shape属性值来实现，内部填充的不同线条可通过设置形状控件的FillStyle属性值来实现，图形中的颜色可通过设置形状控件的BackColor属性来实现。每个形状控件对应一个标签，利用循环语句分别对Shape属性和FillStyle属性赋值。【任务1】图形输出与美化1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码完成步骤【任务1】图形输出与美化知识链接本任务用到了形状控件，它可以方便地创建矩形、正方形、圆和椭圆等简单的几何图形。另外VB还提供了一个用于画直线的简单控件。一、直线控件直线控件的常用属性：BorderStyle属性：用来设置直线的类型。不同BorderStyle的值，对应不同直线样式，对Shape控件也有效。

【任务1】图形输出与美化0-Transparent透明的，即不显示出线来1-Solid实线2-Dash虚线3-Dot点线4-Dash-Dot点划线5-Dash-Dot-Dot双点划线6-InsideSolid内实线(2)BorderWidth属性：设置直线的线宽。(3)BorderColor属性：设置直线的颜色。(4)(X1,Y1),(X2,Y2)属性：设置直线起点和终点的坐标。可以通过改变(X1,Y1),(X2,Y2)的值改变线的位置。【任务1】图形输出与美化

二、形状控件形状控件的常用属性：(1)Shape属性：设置不同的Shape值，可以得到不同的形状。缺省值为0(矩形)。0-Rectangle矩形1-Square正方形2-Oval椭圆形3-Circle圆形4-RoundedRectangle圆角矩形5-RoundedSquare圆角正方形【任务1】图形输出与美化(2)BorderColor属性：设置边框颜色。(3)BorderStyle属性：设置边框样式，其含义与直线控件介绍的相同。(4)BorderWidth属性：设置边框线宽。(5)FillColor属性：设置填充颜色。(6)FillStyle属性：设置填充样式，可以取不同的值，其含义如下：0-Solid实心1-Transprent透明2-HorizontalLine水平线3-VerticalLine垂直线4-UpwardDiagonal向上对角线【任务1】图形输出与美化如图所示，窗体上有一个图像框和五个命令按钮“放大”、“缩小”、“显示”、“隐藏”、“结束”。当窗体中的“显示”按钮呈灰色时，表示这时的图片是显示在窗体中的。单击“隐藏”按钮可以隐藏图片，此时“隐藏”按钮将变为灰色不可用状态。【任务2】图片的放大和缩小单击“放大”按钮时，窗体中的图片将逐渐放大，当该图片充满整个窗体时，系统将弹出一个对话框，警告用户图片不能再放大了。效果描述

5-DownWardDiag向下对角线6-Cross交叉线7-DiagonalCross对角交叉线【任务1】图形输出与美化单击“缩小”按钮时，窗体中的图片将逐渐缩小，当该图片缩小到一定程度时，系统将弹出一个对话框，警告用户图片不能再缩小了。单机窗体中的“结束”按钮，可以结束整个程序的运行。【任务2】图片的放大和缩小本任务中用到了图像框控件，该控件用来显示图形或图片。使用图像框控件时要设置图像控件的stretch属性值为“True”，这样图片大小自动适应图像框大小。图片的放大和缩小可在代码中通过调整width和height属性自行设置，通过显示和隐藏方法，显示和隐藏图片。设计分析

【任务2】图片的放大和缩小1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码完成步骤【任务2】图片的放大和缩小本程序中使用的是图像框控件，VB还提供了图片框。图片框和图像框控件可以显示图形或图片。它们支持多种图片格式，如位图、图标、图元文件、增强型图元文件、JPEG或GIF文件等。一、图片框控件图片框控件主要用来显示图形或图片。该控件不仅可以显示以上提到的几种类型的图片外，它还可以作为控件的容器，能像窗体一样容纳其他控件。知识链接【任务2】图片的放大和缩小1．将图片加载到图片框控件其语法格式为：图片框对象.Picture=LoadPicture("图形文件路径及名称")2．将图片从图片框中删除程序运行中删除一个图形，可通过LoadPicture函数将一个空白的图形装入图片框的Picture属性。

3．图片框控件的主要属性(1)AutoSize属性：AutoSize属性可调整图片框大小以适应图形尺寸。【任务2】图片的放大和缩小【任务2】图片的放大和缩小(2)Align属性：设置图片框的在窗体上的显示位置。(3)BorderStyle属性：设置图片框的边框样式。0为无边框，1为有边框(默认值)。4．用图片框控件做容器图片框可用作其它控件的容器，即在图片框控件上可添加其它控件。这些控件随图片框移动而移动，而控件在图片框控件中的相对位置保持不变。二、图像框控件图像框控件也可以用来装入图形文件。但图像框内不能放其它控件,它不是容器控件。可以在设计时给图像框控件的Picture属性赋值，也可以在程序运行时通过LoadPicture函数给图像框装载图形文件。可以设置图像框的Stretch属性使图像框中的图像自动调整尺寸以适应控件大小。若将Stretch属性值设置为True时，则Picture属性加载的图像自动调整大小以与控件相适合。【任务2】图片的放大和缩小三、图片框和图像框的区别图片框和图像框都可以显示以上提到的几种格式的图形。它们的区别在于：(1)图像框比图片框占用内存少，为了节省(2)图片框可以作为其它控件的容器，而图像框则不能。(3)图片框AutoSize属性设置为True，图片框可调整大小适应图片。图像框的Stretch设置为True，图像框中图像可调整大小适应图像框。(4)图像框支持Move方法，该方法用于改变图像框在容器中的位置，可以利用它来制作一些简单动画。【任务2】图片的放大和缩小【任务3】选择颜色和字体效果描述

如图所示，窗体上有一个文本框，建立两组单选按钮，分别用来设置文本框中文本的字体和颜色。单击“清除”按钮文本框被清空，单击“退出”按钮程序结束。设计分析

本任务中使用了单选按钮控件，在一次操作中只能有一个选择时，就可使用单选按钮控件。利用单选按钮的Value属性来判断该按钮是否被选中，Value属性值为True表示单选按钮被选中，为False表示单选按钮未被选中。对单选按钮分组的控件是框架控件，使用框架控件时，要先添加框架控件，再向框架内添加所需控件。【任务3】选择颜色和字体完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码【任务3】选择颜色和字体知识链接【任务3】选择颜色和字体一、框架控件框架控件同窗体控件一样，是一个容器控件，用于将窗体中的控件按功能或类别分组。在容器中的控件不仅可以随着载体同时移动，而且控件的位置属性也是相对容器设定的。在程序中使用框架的方法有两个：(1)使用框架控件将其他控件分组时，应首先绘制框架控件，然后再绘制其中的控件，这样才能使框架控件及其上的控件一起移动、显示、消失和屏蔽。【任务3】选择颜色和字体(2)如果要用框架控件将已有控件分组，可先选定所有控件，将它们剪切到剪贴板，然后选定框架控件将剪贴板上的控件粘贴到框架控件上。与窗体、图片框等容器控件类似，框架(容器)对内部的控件有裁减作用，如果控件超出了框架的边界，超出部分将被屏蔽起来。有的控件可能因为不在框架的边界内而整个被屏蔽，变得不可见。如图所示，窗体上有一个文本框、四个复选框。程序运行后，用户在文本框中输入一段文字，然后按需要单击各复选框，改变文本框中文本的字体设置。【任务4】选择字形和效果效果描述

本程序中可以将很多效果同时应用到文本框中的文字上，这就需要使用到复选框，复选框的作用是，用户可以从选项中同时选中多个选项。可以通过设置复选框的Value属性，判断复选框是否选中，复选框的Value属性值为1时表示被选中。通过对文本框的Font属性赋值实现不同的字体设置效果。【任务4】选择字形和效果设计分析

【任务4】选择字形和效果完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码本任务用到了复选框控件，下面详细介绍复选框控件。一、复选框控件在多项选择问题中常使用复选框控件，在同一组复选框中，用户可以从选项中同时选中多个选项。例如：我们在做多项选择题时，可以从选项中选择多个答案。选定复选框控件时，该控件将显示选定标记。通常将复选框分组使用，把复选框绘制在不同的容器控件中，运行时，用户从每组中选择一个或多个选项。【任务4】选择字形和效果知识链接1．复选框的属性(1)Value属性：指示复选框处于选中、未选或禁选状态。0-------表示未选1-------表示选中2-------表示禁选(2)Style属性：指定是否使用图形样式0-------常规样式1-------图形样式【任务4】选择字形和效果2．复选框的事件Click(单击)事件：单击鼠标左键时发生。二、复选框控件与单选按钮控件的比较相同点：每个控件都用来指示用户的选择。不同点：一组单选按钮中，一次只能选定其中的一个单选按钮；一组复选框中，一次可选定任意个复选框。【任务4】选择字形和效果设计一个程序进行“文本设置”，用户界面如图所示。用户分别选择字体、字型和字号，然后单击“显示”按钮，此时文本框中文字的字体、字型和字号相应发生变化。【应用提高1】文本设置效果描述

本程序中创建两组单选按钮来选择字体和字号，创建一组复选框来选择字型，用框架对单选按钮和复选框进行分组。单击“显示”按钮时判断每组控件中的选择情况，根据选择情对文本框字体、字型和字号进行设置，单选按钮被选中时其Value属性为True；复选框被选中时其Value属性为1。【应用提高1】文本设置设计分析

【应用提高1】文本设置1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码完成步骤设计一个程序能对列表中的项目进行添加、删除和统计。如图所示，当单击“添加”按钮时，将文本框中输入的内容添加到列表框中；单击“删除”按钮，可删除列表框中选定的项目；单击“统计”按钮，在标签上显示列表框项目总数。【任务5】列表项管理效果描述

本程序中用到了列表框控件，列表框控件的作用是列出可供选择的项目列表。首先要向列表框中添加列表项，可使用列表框的添加方法AddItem实现；要删除列表框中选中的列表项，可使用列表框的删除方法RemoveItem实现；统计功能可使用列表框的ListCount属性计算。【任务5】列表项管理设计分析

【任务5】列表项管理1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码完成步骤【任务5】列表项管理知识链接本程序中主要运用了列表框控件，列表框控件用于列出可供选择的项目的列表，用户可以从中选择一个或多个项目，选中的项目反白显示。如果所列出的项目很多，超出了列表框的设计高度，会自动加上垂直滚动条。同样，如果某个项目的长度超出了设计宽度，也会自动添加水平滚动条。下面详细介绍列表框控件。列表框控件1．列表框的属性除常用属性外，列表框控件还有以下属性：List属性：一个字符串数组，含有列表框中的全部项目。Listcount属性:表示列表框中包含项目的总数。Listindex属性:表示当前选中的项目的索引号。Text属性:表示当前列表框中选定的项目内容Selected属性:指示某个项目的选中状态，是一个数组，数组元素的个数与列表框中的项数相Style属性:指示列表框的样式MultiSelect属性:指明是否允许在列表框内同时选中多个选项。【任务5】列表项管理(8)Sorted属性：指定列表框中的各选项是否自动按字母顺序排序(不区分大小写)。(9)Columns属性：指定列表框中列表项的列表方式。2．列表框的事件(1)Click单击事件(2)Dbclick双击事件3．列表框的方法(1)Additem方法：向列表框添加列表项格式：控件名.Additemitem$[,index]【任务5】列表项管理(2)RemoveItem方法：从列表框中删除列表项格式：控件名.RemoveItemIndex(3)Clear方法：清除列表框中的所有项目。格式：控件名.Clear【任务5】列表项管理如图所示。窗体中有三个组合框，用来存放学生的个人的信息，分别从三个组合框中选择合适的选项，选择的结果会显示在显示框架中的标签上。【任务6】选择学生信息效果描述

本程序要在三个组合框中选择数据，需要事先在窗体的Load事件中使用组合框的添加方法AddItem向三个组合框中添加各自的项目内容，以便运行后供用户选择。运行后从三个组合框中选择项目可通过组合框的Click事件完成。由于三个组合框每次从组合框中选择的内容都要在标签上显示，方便起见，可定义一个过程，该过程用来在标签上显示三个组合框选择的内容，这样每个组合框的单击事件中只需调用该过程即可。当三个组合框选择了对应的项目内容后，在标签Label1上就会显示出对应的学生信息了。【任务6】选择学生信息设计分析

【任务6】选择学生信息完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码本程序用到了组合框控件，组合框是组合了列表框和文本框的控件，允许在文本框中输入和编辑数据，也可以在列表框中选择数据。下面详细介绍组合框。组合框控件

1．组合框的属性

(1)Style属性：确定组合框控件的类型和显示方式

(2)Locked属性：用来表示组合框的文本框是否被锁定。【任务6】选择学生信息知识链接

2.组合框的事件组合框的常用事件除单击事件Click、双击事件Dbclick外，还有Change事件。3．组合框的方法组合框的方法与列表框相似，主要包括：(1)Additem方法：向组合框添加一个选项。(2)RemoveItem方法：从组合框中删除一个选项。(3)Clear方法：清除组合框中的所有选项。【任务6】选择学生信息设计一个简单的报名窗体，运行后界面如图所示。在文本框中输入学生的学号和姓名，从组合框中选择专业，然后单击“加入“按钮将学生学号、姓名和专业添加到列表框中，单击”删除选项“按钮删除列表框中所选择的项目，单击“清空列表”按钮把整个列表框清空。【应用提高2】报名窗体效果描述

本程序首先要在窗体的Load事件中用组合框的AddItem(添加)方法将专业列表添加到组合框中。单击“加入”按钮将学生学号、姓名和专业添加到列表框中用列表框的AddItem(添加)方法；删除所选项目通过列表框RemoveItem(移除)方法来完成，但首先应判断列表框中是否有记录，如果有，再判断当前被选中的是那项，然后用RemoveItem方法将此项从列表框中移除；清空列表可用Clear方法来实现。【应用提高2】报名窗体设计分析

1．创建界面按题目要求创建界面

2．过程代码编写并输入过程代码【应用提高2】报名窗体完成步骤设计一个简易食品计价器，通过组合框选择或输入要买的水果，单击垂直滚动条调整要买的水果价格，单击水平滚动条调整要买的水果数量，在文本框中显示该水果的价钱。运行效果如图所示。【任务7】设计简易计价器效果描述

本任务用到了滚动条控件，这个控件用于提供滚动浏览信息的功能。选择水果种类可以用组合框来实现；用垂直滚动条来调整水果的价格；用水平滚动条来调整水果的数量，文本框中显示的该水果的总价就是垂直滚动条和水平滚动条当前值(滚动条的Value属性值)的乘积。【任务7】设计简易计价器设计分析

1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码【任务7】设计简易计价器完成步骤本例中用到了滚动条控件。在VB中，滚动条分为水平滚动条(HScrollBar)和垂直滚动条(VScrollBar)，滚动条控件用于提供滚动浏览信息的功能，也可以作为用户信息输入的控件。这两种滚动条除了方向不同之外，其功能和操作是一样的。滚动条1．滚动条控件的属性(1)Value属性：对应于滚动块在滚动条中的相对位置，其值是一个整数。【任务7】设计简易计价器知识链接(2)Max和Min属性：用于设定滚动条Value属性的取值范围。(3)LargeChange和SmallChange属性：LargeChange属性确定在滚动块和滚动箭头之间空白区中单击鼠标时，Value属性值的变化量；SmallChange属性确定当用鼠标单击滚动条两端箭头时，Value属性值的变化量。2．滚动条控件的事件(1)Change事件：改变滚动条Value属性值后触发。(2)Scroll事件：拖动滚动块时触发。【任务7】设计简易计价器制作滚动字幕，使“北京欢迎您！”在窗体中左右滚动，并且窗体底部显示北京时间。运行界面如图所示。【任务8】制作滚动字幕效果描述

滚动字幕就是一行文字在屏幕上连续地横向（纵向）移动位置。需要滚动的文字可以放在标签控件中，而连续地横（纵向）移动位置就是每隔一个固定的时间间隔改变标签控件的Left（Top）属性值。这就要用到计时器控件，通过计时器控件的Interval属性设置时间间隔，计时器控件的Timer事件就会每隔一个时间间隔自动发生，把改变标签Left（Top）属性的程序代码放在计时器控件Timer1的Timer事件中，即可实现滚动字幕。【任务8】制作滚动字幕设计分析

在窗体上显示时间，可在窗体上再添加另一个计时器控件Timer2，将计时器Timer2的时间间隔Interval属性设置为1000(相当于1秒)，在计时器控件Timer2的Timer事件中把当前计算机系统的时间放置在标签控件上。【任务8】制作滚动字幕【任务8】制作滚动字幕完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码本程序中计时器(Timer)控件用来计时，可以实现需要定时完成的某些操作。计时器控件每隔一段时间自动执行一段程序。计时器控件设计时可见，运行时是不可见的。下面介绍计时器控件属性和事件。计时器控件1．计时器控件的属性(1)Enabled属性：表示计时器是否有效(是否触发Timer事件)。(2)Interval属性：表示两次触发Timer事件之间的事件间隔，单位为毫秒(千分之一秒)。【任务8】制作滚动字幕知识链接2．计时器控件的事件计时器控件只有Timer事件。每经过Interval属性指定的一段时间，就产生一个Timer事件。计时器控件有比较广泛的用途，比如模拟时钟、秒表，制作动画等。【任务8】制作滚动字幕设计一个简单的绘图应用程序，界面如图所示。在窗体的图片框中，当鼠标按钮按下并拖动时实现绘图功能，当释放鼠标按钮时停止绘画。在绘图的过程中可以通过点击水平滚动条来改变画笔的宽度，单击“颜色”命令按钮，在弹出的颜色对话框中选择画笔的颜色，单击“擦除”命令按钮清除图片框中所画的内容。【任务9】制作简易画板效果描述

本程序可定义一个逻辑型变量用来控制是否绘画，例如定义变量paintnow为逻辑型变量，当鼠标按钮在图片框中按下时，触发图片框的MouseDown事件，可在图片框的MouseDown事件中，设置paintnow为True，表示启动绘图；释放鼠标按钮时，触发图片框的MouseUp事件，设置paintnow的值为False，表示停止绘画。鼠标按钮在图片框中按下后进行拖动时，触发图片框的MouseMove事件，可在图片框的MouseMove事件中，利用条件语句判断当前paintnow的值是否为True，如果为True，则用Pset方法在图片框中绘画。【任务9】制作简易画板设计分析

在滚动条的Change事件中，把滚动条的Value属性值赋给图片框的DrawWidth属性就可以通过滚动条改变画笔宽度，把通用对话框的颜色Color属性值赋给图片框的ForeColor属性就可以设置画笔颜色，擦除功能利用图片框的Cls方法来实现。【任务8】制作滚动字幕【任务9】制作简易画板完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码【任务9】制作简易画板本例中用到了鼠标事件，利用鼠标的移动、点击来获得用户的信息，也可通过鼠标的操作来响应用户的信息，是可视化程序设计的重要功能之一。鼠标事件1．MouseDown事件MouseDown事件按下鼠标键时触发。2．MouseUp事件MouseUp事件释放鼠标键时触发。3．MouseMove事件MouseMove事件移动鼠标时触发。知识链接【任务10】统计字符个数在窗体的文本框中输入一串字符，以回车键结束，分别统计其中大、小写字母的个数、数字个数、其它符号个数，在标签上显示出统计结果。程序运行界面如图所示。效果描述

【任务10】统计字符个数设计本程序前，要先清楚大写字母、小写字母、数字各自的KeyAscii范围。本程序事先定义s1,s2,n,m4个变量，s1用于存放大写字母个数，s2用于存放小写字母个数，n用于存放数字个数，m用于存放其他符号个数。当KeyAscii≠13时，表示正在输入字符，每输入一个字符先通过KeyAscii范围判断该字符在属于哪种字符，并把表示该类型字符个和的变量或s1,或s2,或n,或m加1。当KeyAscii=13表示键入的是“回车”，此时认为输入完毕，统计结果，并将结果显示在标签控件上。设计分析

【任务10】统计字符个数完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码【任务10】统计字符个数本程序运用了键盘事件，键盘事件有三种，即KeyPress、KeyUp和KeyDown事件。键盘事件KeyPress事件在按下与ASCII字符对应的键时将触发KeyPress事件。2．KeyDown事件和KeyUp事件

KeyDown事件在按下按键时触发，KeyUp事件则在释放按键时产生。知识链接【任务10】统计字符个数3．KeyPress事件与KeyDown／KeyUp事件的区别：KeyPress事件返回的是字符的ASCII码值，而KeyDown／KeyUp事件返回的是键的扫描代码。KeyPress事件识别的击键范围比KeyDown／KeyUp事件小。【应用提高3】录入书名设计一个应用程序如图所示，在文本框中输入一个书名后按回车键，即可将书名添加到列表框中，按Ctrl+C键可关闭窗体。效果描述

【应用提高3】录入书名要想实现“在文本框中输入一个书名后按回车键即可将书名添加到列表框中”的效果，应先在窗体的KeyPress事件中，用条件语句判断参数KeyAscii的值，若值为13，表示用户按了回车键，然后利用AddItem方法即可将文本框的Text属性值添加到列表框中。要实现“按Ctrl+C键可关闭窗体”的功能，应先在窗体的KeyDown事件中，用条件语句判断参数KeyCode和Shift的值，若值为KeyCode=vbKeyCAndShift=2，表示用户按了“Ctrl+C”键，然后利用语句UnloadMe即可关闭窗体。设计分析

【应用提高3】录入书名完成步骤1．创建界面按题目要求创建界面2．过程代码编写并输入过程代码【任务11】设计夜空画面在窗体上画一幅明月高挂、群星闪烁的画面。要求程序开始运行时，窗体呈现黑色，在窗体的右上角出现月亮图形，同时窗体上每隔1秒就随机产生600个白点，模仿群星闪烁的效果。如图所示。效果描述

【任务11】设计夜空画面本程序可采用Circle方法和Pset方法，右上角的月亮图形可利用画圆的方法Circle在图片框的Pa