常用控件教学内容.ppt

《常用控件教学内容.ppt》由会员分享，可在线阅读，更多相关《常用控件教学内容.ppt（67页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 第6章 常用控件 1常用控件 第6章 常用控件 2（2）Default：确认属性（逻辑值），设置为确认属性（逻辑值），设置为True时，按时，按Enter键相当于用鼠标器单击了该按钮。键相当于用鼠标器单击了该按钮。注意：在一个窗体只能的一个按钮的注意：在一个窗体只能的一个按钮的Default设置为设置为Ture（3）Cancel:取消功能属性（逻辑值），当设置为取消功能属性（逻辑值），当设置为Ture时，时，程序运行时按程序运行时按Esc键与单击此命令按钮的效果相同。键与单击此命令按钮的效果相同。注意：在一个窗体只能的一个按钮的注意：在一个窗体只能的一个按钮的Cancel属性设置为属性设置为

2、Ture（4）Value:检查该按钮是否按下检查该按钮是否按下.该属性在设计时无效该属性在设计时无效.（5）Picture:按钮可显示图片文件按钮可显示图片文件(.bmp和和.Ico)，只有当，只有当Style属性值设属性值设为为1时有效时有效（6）Style:确定显示的形式确定显示的形式.0只能显示文字只能显示文字,1文字、图文字、图形均可形均可。（7）ToolTipText：设置工具提示，和设置工具提示，和Picture结合使用。结合使用。6.1.1 6.1.1 命令按命令按钮钮 第6章 常用控件 3（二）、方法（二）、方法1.Move2.Setfocus获得焦点获得焦点（三）、事（三）、

3、事件件最常用的是最常用的是Click()事件，一般也只对该事件进事件，一般也只对该事件进行编程。行编程。6.1.1 6.1.1 命令按命令按钮钮 第6章 常用控件 4用于显示文本用于显示文本(输出输出)信息，不能作为输入信息的界面。信息，不能作为输入信息的界面。1基本属性基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与窗体的使用相同。等与窗体的使用相同。2常用属性常用属性（1）Caption属性属性Caption属属性性用用来来改改变变Label控控件件中中显显示示的的文文本本。Caption属属

4、性性允允许许文文本本的的长长度度最最多多为为1024字字节节。缺缺省省情情况况下下，当当文文本本超超过过控控件件宽宽度度时时，文文本本会会自自动动换换行行，而而当当文文本本超超过过控控件件高度时，超出部分将被裁剪掉。高度时，超出部分将被裁剪掉。6.1.2 6.1.2 标签控件标签控件 第6章 常用控件 5（2）Alignment属性属性设置设置Caption属性中文本的对齐方式，共有三种可选值：属性中文本的对齐方式，共有三种可选值：0左对齐左对齐(LeftJustify)；1右对齐右对齐(RightJustify)；2居中对齐居中对齐(CenterJustify)。（3）BackStyle属性

5、属性该该属属性性用用于于确确定定标标签签的的背背景景是是否否透透明明。有有两两种种情情况况可可选选：值值为为0时时，表表示示背背景景透透明明，标标签签后后的的背背景景和和图图形形可可见见；值值为为1时，表示不透明，标签后的背景和图形不可见。时，表示不透明，标签后的背景和图形不可见。6.1.2 6.1.2 标签控件标签控件 第6章 常用控件 6（4）AutoSize属性属性AutoSize属属性性确确定定标标签签是是否否会会随随标标题题内内容容的的多多少少自自动动变变化化。如如果果值值为为True，则则随随Caption内内容容的的大大小小自自动动调调整整控控件件本本身身的的大大小小，且且不不换

6、换行行；如如果果值值为为False，表表示示标标签签的的尺尺寸寸不不能能自自动动调整，超出尺寸范围的内容不予显示。调整，超出尺寸范围的内容不予显示。（5）WordWrap属性属性 6.1.2 6.1.2 标签控件标签控件 第6章 常用控件 7例例6.1在在窗窗体体上上，放放置置5个个标标签签，其其名名称称使使用用默默认认值值Label1Label5，它它们们的的高高度度与与宽宽度度相相同同，在在属属性性窗窗口口，按按下下表表设设置置它们的属性它们的属性 6.1.2 6.1.2 标签控件标签控件 对象属性（属性值）属性（属性值）属性（属性值）属性（属性值）标签1Name（Label1）Capti

7、on（”左对齐”）Alignment（0）BorderStyle（1）标签2Name（Label2）Caption（”水平居中”）Alignment（2）BorderStyle（1）标签3Name（Label3）Caption（”自动”）AutoSize（True）BorderStyle（1）标签4Name（Label4）Caption（”背景白”）BackColor（&H00FFFFFF&）BorderStyle（0）标签5Name（Label5）Caption（”前景红”）ForeColor（&H000000FF&）BorderStyle（0）第6章 常用控件 8设置后各标签的显示如下图设

8、置后各标签的显示如下图3、事件、事件标签可响应单击（标签可响应单击（Click)和双击（和双击（DblClick）事件，但一）事件，但一般情况不对它进行编程般情况不对它进行编程 6.1.2 6.1.2 标签控件标签控件 第6章 常用控件 9是一个文本编辑区域，在该区域输入，编辑和显示文本。是一个文本编辑区域，在该区域输入，编辑和显示文本。（一）（一）属性属性1基本属性基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。等与标签控件相同。2常用属性常用属性（1）.Text文本属性文本属性在

9、文本框中显示的正文内容存放在在文本框中显示的正文内容存放在Text属性中。当程序运属性中。当程序运行时，用户通过键盘输入正文内容，保存在行时，用户通过键盘输入正文内容，保存在Text属性中。属性中。文本框没有文本框没有Caption属性属性6.1.3文本框控件文本框控件 第6章 常用控件 10（2）Maxlength：设置正文的最多字符个数设置正文的最多字符个数,0任意长度值任意长度值。（3）MultiLine：是否为多行是否为多行,默认一行默认一行.False（4）ScrollBars：当当MultiLine为为True时时,该属性才有效该属性才有效,滚动条滚动条的形式。的形式。0-None

10、：无滚动条、：无滚动条、1-Horizontal：水平滚动条、：水平滚动条、2-Vertical垂直滚动条、垂直滚动条、3-Both水平和垂直滚动条水平和垂直滚动条。（5）Locked：是否可被编辑属性，是否可被编辑属性，False，表示为可编辑。，表示为可编辑。（6）PassWordChar属性属性设置设置PasswordChar属性为了掩盖文本框中输入的字符。属性为了掩盖文本框中输入的字符。该属性的设置只有在该属性的设置只有在MultiLine设为设为False才有效才有效6.1.3文本框控件文本框控件 第6章 常用控件 11（7）SelStart、SelLength和和SelText属性

11、属性这三个属性是文本框中对文本的编辑属性。这三个属性是文本框中对文本的编辑属性。SelStart：确确定定在在文文本本框框选选中中文文本本的的起起始始位位置置。第第一一字字符符的的位位置置为为0。若若没没有有选选择择文文本本，则则用用于于返返回回或或设设置置文文本本的的插插入入点点位位置置，如如果果SelStart的的值值大大于于文文本本的的长长度度，则则SelStart取取当当前前文本的长度：文本的长度：SelLength：设置或返回文本框中选定的文本字符串长度设置或返回文本框中选定的文本字符串长度（字符个数）。（字符个数）。SelText：设置或返回当前选定文本中的文本字符串。设置或返回当

12、前选定文本中的文本字符串。6.1.3文本框控件文本框控件 第6章 常用控件 12Change事件：事件：当改变文本框的当改变文本框的Text属性时会引发该事件。当用输入一属性时会引发该事件。当用输入一个字符，就会触发一次个字符，就会触发一次Change事件。事件。例：在文本框例：在文本框Text1的的Change事件编写有如下程序代码：事件编写有如下程序代码：PrivateSubText1_Change()PrintText1.texEndSub当程序运行后中输入当程序运行后中输入ABCD，则在窗体上在输出结果是？，则在窗体上在输出结果是？6.1.3文本框控件文本框控件常用事件常用事件 第6章

13、 常用控件 13KeyPress事件事件当用户按下并释放键盘上一个当用户按下并释放键盘上一个ANSI键时，就会触发一键时，就会触发一次该事件，并返回一个次该事件，并返回一个KeyAscii参数（字符的参数（字符的Ascii值）到该值）到该事件过程中。事件过程中。例如：例如：PrivateSubText1_KeyPress(KeyAsciiAsInteger)PrintKeyAscii,Chr(KeyAscii)EndSub当程序运行后中输入当程序运行后中输入ABCD，则在窗体上在输出结果是？，则在窗体上在输出结果是？LostFocus：当控件失去焦点时发生。当控件失去焦点时发生。GotFocu

14、s：当控件获得焦点时发生。当控件获得焦点时发生。6.1.3文本框控件文本框控件常用事件常用事件 第6章 常用控件 14（三）（三）常用方法常用方法文本框最有用的方法是：文本框最有用的方法是：SetFocus，使用形式：，使用形式：对象对象.SetFocus功能：功能：是把光标移到指定的文本框对象中。是把光标移到指定的文本框对象中。例例6.2设计一个打字练习程序，界面如图设计一个打字练习程序，界面如图6-4所示。所示。要求：程序运行后，单击要求：程序运行后，单击“开始开始”按钮，即在上方按钮，即在上方标签中产生一行练习文字，用户可在下方文本框中标签中产生一行练习文字，用户可在下方文本框中输入文字

15、，单击输入文字，单击“结束结束”按钮后，显示统计信息并按钮后，显示统计信息并结束程序。结束程序。6.1.3文本框控件文本框控件 第6章 常用控件 156.2 单选钮、检查框及框架6.2.1单选钮单选钮1用途用途单单选选钮钮（OptionButton）也也称称作作选选择择按按钮钮。一一组组单单选选钮钮控控件件可可以以提提供供一一组组彼彼此此相相互互排排斥斥的的选选项项，任任何何时时刻刻用用户户只只能能从从中中选选择择一一个个选选项项，实实现现一一种种“单单项项选选择择”的的功功能能，被被选选中中项项目目左左侧侧圆圆圈圈中会出现一黑点。中会出现一黑点。单选按钮 第6章 常用控件 162.重要属性重

16、要属性（1）Caption：文本标题。设置单选钮的文本注释内容。文本标题。设置单选钮的文本注释内容。（2）Alignment属性属性：0：LeftJustify(缺省设置缺省设置)控件钮在左边，标题显示控件钮在左边，标题显示在右边。在右边。1：RightJustify控件钮在右边，标题显示在左边。控件钮在右边，标题显示在左边。（3）Value属性属性True:True:单选钮被单选钮被选定选定False:False:单选钮未被单选钮未被选定（选定（缺省设置）缺省设置）（4）Style属性属性0-Standard：标准方式标准方式 1-Graphical：图形方式：图形方式说说明：明：在在Sty

17、le属性设置为属性设置为1时，可使用时，可使用Picture属性属性（未选定时的图标或位图）（未选定时的图标或位图）6.2 单选钮、检查框及框架 第6章 常用控件 173方法方法 SetFocus方方法法是是单单选选钮钮控控件件最最常常用用的的方方法法，可可以以在在代代码码中中通通过该方法将过该方法将Value属性设置为属性设置为True。与与命命令令按按钮钮相相同同，使使用用该该方方法法之之前前，必必须须要要保保证证单单选选钮钮处处于于可见和可用状态（即可见和可用状态（即Visible与与Enabled属性值均为属性值均为True）。）。4事件事件Click事事件件是是单单选选钮钮控控件件最

18、最基基本本的的事事件件，一一般般情情况况用用户户无无需需为为单单选选钮钮编编写写Click事事件件过过程程，因因为为当当用用户户单单击击单单选选钮钮时时，它它会自动改变状态。会自动改变状态。例例6.1单选钮示例（单选钮示例（Pg.185）。）。6.2 单选钮、检查框及框架 第6章 常用控件 186.2.2检查框检查框1用途用途检检查查框框（CheckBox）也也称称作作复复选选框框、选选择择框框。一一组组检检查查框框控控件件可可以以提提供供多多个个选选项项，它它们们彼彼此此独独立立工工作作，所所以以用用户户可可以以同同时时选选择择任任意意多多个个选选项项，实实现现一一种种“不不定定项项选选择择

19、”的的功功能能。选选择择某一选项后，该控件将显示某一选项后，该控件将显示，而清除此选项后，而清除此选项后，消失。消失。检查框被选中6.2 单选钮、检查框及框架 第6章 常用控件 192.重要属性重要属性Caption、Alignment、Style与单选钮相同与单选钮相同检查框的检查框的Value属性与单选按钮不同，其值为数值型数属性与单选按钮不同，其值为数值型数据，可取据，可取0,1,2 检查框检查框0-Unchecked：未被未被选定选定1-Checked：选定：选定2-Grayed：灰色，禁止选择灰色，禁止选择 单选钮单选钮True:True:单选钮被单选钮被选定选定False:Fals

20、e:单选钮未被单选钮未被选定，选定，缺省设置缺省设置检查框与单选按钮检查框与单选按钮Value属性的比较属性的比较6.2 单选钮、检查框及框架 第6章 常用控件 204事件事件Click事事件件是是检检查查框框控控件件最最基基本本的的事事件件。用用户户一一般般无无需需为为检检查查框框编编写写Click事事件件过过程程，但但其其对对Value属属性性值值的的改改变遵循以下规则：变遵循以下规则：单击未选中的检查框时，单击未选中的检查框时，Value属性值变为属性值变为1；单击已选中的检查框时，单击已选中的检查框时，Value属性值变为属性值变为0；单击变灰的检查框时，单击变灰的检查框时，Value

21、属性值变为属性值变为0。6.2 单选钮、检查框及框架 第6章 常用控件 216.2.3 框架(Frame)Frame控件为控件提供可标识的分组。它是一个控件为控件提供可标识的分组。它是一个容器控件容器控件。当需要在同一窗体内建立几组互独立的单选钮时，就需要用框当需要在同一窗体内建立几组互独立的单选钮时，就需要用框架将每一组单选钮框框起来，把架将每一组单选钮框框起来，把OptionButton控件分成几组，控件分成几组，如下形式。如下形式。框架设Caption为 字体 第6章 常用控件 22框架内控件的创建方法：框架内控件的创建方法：为了将控件分组，首先需要绘制为了将控件分组，首先需要绘制Fra

22、me控件，然后绘制控件，然后绘制Frame里面的控件。这样就可以把框架和里面的控件同时移动。里面的控件。这样就可以把框架和里面的控件同时移动。如果在如果在Frame外部绘制了一个控件并试图把它移到框架内部，外部绘制了一个控件并试图把它移到框架内部，那么控件将在那么控件将在Frame的上部，这时需分别移动的上部，这时需分别移动Frame和控件。和控件。方法方法1：单击工具箱上的工具，然后用出现的单击工具箱上的工具，然后用出现的“+”指针，指针，在框架中适当位置拖拉出适当大小的控件。不能使用双击工具在框架中适当位置拖拉出适当大小的控件。不能使用双击工具箱上工具的自动方式。箱上工具的自动方式。方法方

23、法2：将控件将控件“剪切剪切”(Ctrl+X)到剪贴板，然后选中到剪贴板，然后选中框架，使用框架，使用(Ctrl+V)命令粘贴到框架内。命令粘贴到框架内。6.2.3 框架(Frame)第6章 常用控件 23重要属性重要属性1.Caption属性：框架标题属性：框架标题2 Enabled属性：属性：缺省为缺省为TrueFalse：标题呈灰色，：标题呈灰色，不允许对框架内的所有对象进行操作不允许对框架内的所有对象进行操作。3.Visible属性：属性：True：框架及其控件可见。：框架及其控件可见。False：框架及其控件被隐含起来。：框架及其控件被隐含起来。事件：事件：框架可以响应的事件框架可以

24、响应的事件ClickClick、DblClickDblClick一般不需要有关框架的事件过程。一般不需要有关框架的事件过程。例例6.2单选钮、检查框及框架用法示例。单选钮、检查框及框架用法示例。Pg.1876.2.3 框架(Frame)第6章 常用控件 246.3 滚动条(ScrollBar)1用用途途 滚动条控件（滚动条控件（ScrollBar）分为水平滚动条（）分为水平滚动条（HScrollbar）和垂直滚动条（和垂直滚动条（VscrollBar）二种，通常附在窗体上协助观察）二种，通常附在窗体上协助观察数据或确定位置，也可用作数据输入工具，用来提供某一范数据或确定位置，也可用作数据输入工

25、具，用来提供某一范围内的数值供用户选择。围内的数值供用户选择。第6章 常用控件 252.属性属性(1)Value滑块所处位置所代表的值。滑块所处位置所代表的值。(2)Max：最大值：最大值-32,76832,767(3)Min：最小值：最小值-32,76832,767(4)SmallChange最小变动值，最小变动值，单击箭头时移动的增量值。单击箭头时移动的增量值。(5)LargeChange最大变动值，单击空白处时移动的增量值。最大变动值，单击空白处时移动的增量值。6.3 滚动条(ScrollBar)第6章 常用控件 264事件事件（1）Change事件事件滚滚动动条条的的Change事事件

26、件在在移移动动滚滚动动框框或或通通过过代代码码改改变变其其Value属属性性值值时时发发生生。单单击击滚滚动动条条两两端端的的箭箭头头或或空空白白处处将将引引发发Change事件。事件。（2）Scroll事件事件当当滚滚动动框框被被重重新新定定位位，或或按按水水平平方方向向或或垂垂直直方方向向滚滚动动时时，Scroll事件发生。事件发生。拖动滑块时会触发拖动滑块时会触发Scroll事件。事件。Scroll事事件件与与Change事事件件的的区区别别在在于于：当当滚滚动动条条控控件件滚滚动动时时Scroll事事件件一一直直发发生生，而而Change事事件件只只是是在在滚滚动动结结束束之之后后才发

27、生一次。才发生一次。6.3 滚动条(ScrollBar)第6章 常用控件 27例例6.6滚动条示例。设滚动条示例。设计一个程序进行坐标设置计一个程序进行坐标设置教材教材Pg.1761786.2 滚动条(ScrollBar)第6章 常用控件 286.4列表框与组合框列表框与组合框一、用途一、用途 列表框控件（列表框控件（ListBox）用于显示项目列表，用户可从中用于显示项目列表，用户可从中选择一个或多个项目选择一个或多个项目。如果项目总数超过了可显示的项目数，。如果项目总数超过了可显示的项目数，VB会自动加上滚动条。会自动加上滚动条。列表框有两种风格：标准和复选列表框。通过它的列表框有两种风格

28、：标准和复选列表框。通过它的Style属性来设置。如下图：属性来设置。如下图：第6章 常用控件 29组组合合框框控控件件（ComboBox）将将文文本本框框和和列列表表框框的的功功能能结结合合在在一一起起，用用户户可可以以在在列列表表中中选选择择某某项项（只只能能选选取取一一项项）。或在编辑区域中直接输入文本内容来选定项目。或在编辑区域中直接输入文本内容来选定项目。组组合合框框共共三三种种风风格格：下下拉拉式式组组合合框框、简简单单组组合合框框和和下下拉拉式式列列表框（见下图）。表框（见下图）。6.4列表框与组合框列表框与组合框 第6章 常用控件 301Style属性属性 该该值值用用来来指指

29、示示控控件件的的显显示示类类型型和和行行为为。在在运运行行时时是是只只读读的的。对对于于列列表表框框控控件件或或组组合合框框控控件件都都有有Style属属性性，但但它它们们的的含含义义是是不同的，见表不同的，见表6.5和表和表6.6。Pg194例如：例如：在窗体上放置在窗体上放置2个列表框，将其个列表框，将其Style属性分别设置为属性分别设置为0和和1；放置；放置3个组合框，将它们个组合框，将它们Style属性分别设置为属性分别设置为0、1和和2。二、主要二、主要属性属性6.4列表框与组合框列表框与组合框 第6章 常用控件 312List、ListCount和和ListIndex属性属性Li

30、st：字符型数组，存放列表框的项目数据，下标是从字符型数组，存放列表框的项目数据，下标是从0开开始的。始的。例如：例如：List(0)表示第一项（表示第一项（Listindex=0）的内容）的内容列表框项目可在设计模式下一项一项输入。列表框项目可在设计模式下一项一项输入。ListIndex：为整型值，选中的项目的序号，如果列表框可为整型值，选中的项目的序号，如果列表框可多选，则为最后一次选中项目的序号，多选，则为最后一次选中项目的序号，没有项目选中时为没有项目选中时为-1。ListCount：为整型值，表示项目的数量，为整型值，表示项目的数量，ListCount-1是最是最后一项的下标。后一项

31、的下标。6.4列表框与组合框列表框与组合框 第6章 常用控件 323MultiSelect属性属性用用于于指指示示是是否否能能够够在在列列表表框框控控件件中中进进行行复复选选以以及及如如何何进进行行复复选，选，在运行时是只读的。在运行时是只读的。注意，注意，组合框控件无此属性组合框控件无此属性。设置值含 义0（缺省值）不允许复选1简单复选。鼠标单击或按下空格键在列表中选中或取消选中项。箭头键移动焦点2扩展复选。按下 SHIFT 并单击鼠标将在以前选中项的基础上扩展选择到当前选中项。按下 CTRL 并单击鼠标来在列表中选中或取消选中项表表6.7MultiSelect属性设置值及含义属性设置值及含

32、义6.4列表框与组合框列表框与组合框 第6章 常用控件 334Selected属性属性 该该属属性性返返回回或或设设置置列列表表框框控控件件中中的的一一个个项项目目的的选选择择状状态态。该该属属性性是是一一个个逻逻辑辑类类型型的的数数组组，数数组组元元素素个个数数与与列列表表框框中中的的项项目目数相同，其下标的变化范围与数相同，其下标的变化范围与List属性相同。属性相同。例如：例如：List1.Selected（0）=True表示列表框表示列表框List1的第一个的第一个项目被选中，此时项目被选中，此时ListIndex的值设置为的值设置为0。Selected属性在属性在设计设计时时是不可用

33、的，即无法在属性窗口中设置属性值。是不可用的，即无法在属性窗口中设置属性值。5Sorted属性属性返返回回一一个个逻逻辑辑值值，当当Sorted属属性性为为True时时列列表表框框控控件件或或组组合合框框控控件件的的项项目目自自动动按按字字母母表表顺顺序序（升升序序）排排序序，为为False时时项项目目按按加加入入的的先先后后顺顺序序排排列列显显示示。该该属属性性只只能能在在设设计计时时设设置置，不能在程序代码中设置。不能在程序代码中设置。6.4列表框与组合框列表框与组合框 第6章 常用控件 346Text属性属性对于组合框：（对于组合框：（Combo1）下拉式组合框与简单组合框（下拉式组合框

34、与简单组合框（Style=0和和1）：）：Text属性返回编辑区域中的文本。属性返回编辑区域中的文本。下下拉拉列列表表框框，Text属属性性的的返返回回当当前前被被选选中中的的项项，值值总总与与combo1.List（combo1.ListIndex）的值相同。）的值相同。对于列表框对于列表框：（：（List1）Text属属性性选选中中的的文文本本，如如果果列列表表框框可可多多选选，则则为为最最后后一一次次选选中项目。中项目。Text属性值总与属性值总与List1.List（List1.ListIndex）的值相同。）的值相同。6.4列表框与组合框列表框与组合框 第6章 常用控件 35 Lis

35、tCount=6ListIndex=3(下标从下标从0开始的开始的)Selected(3)=True，其余为，其余为False。Sorted=False，没有排序。，没有排序。Text=“abc”，List1.List(List1.ListIndex)=“abc”Combo1.List(Combo1.ListIndex)=“abc”列表框、组合框各主要属性的值：列表框、组合框各主要属性的值：6.4列表框与组合框列表框与组合框 第6章 常用控件 363方法方法1.1AddItem方法方法用于将项目添加到列表框控件或组合框控件。用于将项目添加到列表框控件或组合框控件。语法格式：语法格式：对象名对象

36、名.AddItemitem,index其中：其中：item:为字符串表达式，表示要加入的项目。为字符串表达式，表示要加入的项目。Index:决定新增项目的位置，决定新增项目的位置，缺省，则添加在最后。缺省，则添加在最后。2RemoveItem方法方法3用于从列表框控件或组合框控件中删除一项。用于从列表框控件或组合框控件中删除一项。4语法格式：语法格式：1.对象名对象名.RemoveItemindex2.对对index参数的规定同参数的规定同AddItem方法。方法。6.4列表框与组合框列表框与组合框 第6章 常用控件 37例如，要删除列表框（例如，要删除列表框（List1）中所有选中的项目，可

37、使）中所有选中的项目，可使用下面的程序段：用下面的程序段：i=0Do While i=0 If List1.Selected(i)Then List1.RemoveItem I End If i=i-1loop也可这样写也可这样写 第6章 常用控件 383Clear方法方法用于清除列表框控件或组合框控件中的所有项目。用于清除列表框控件或组合框控件中的所有项目。语法格式：语法格式：对象名对象名.Clear例如，删除列表框（例如，删除列表框（List1）中所有项目，可使用：）中所有项目，可使用：List1.Clear6.4列表框与组合框列表框与组合框 第6章 常用控件 394、事件、事件（1）Cl

38、ick事件事件当当单单击击某某一一列列表表项项目目时时，将将触触发发列列表表框框与与组组合合框框控控件件的的Click事事件件。该该事事件件发发生生时时系系统统会会自自动动改改变变列列表表框框与与组组合合框框控控件件的的ListIndex、Selected、Text等属性，无需另行编写代码。等属性，无需另行编写代码。（2）DblClick事件事件当当双双击击某某一一列列表表项项目目时时，将将触触发发列列表表框框与与简简单单组组合合框框控控件件的的DblClick事件。事件。（3）Change事件事件（列表框没有此事件）（列表框没有此事件）当当用用户户通通过过键键盘盘输输入入改改变变下下拉拉式式

39、组组合合框框或或简简单单组组合合框框控控件件的的文文本本框框部部分分的的正正文文，或或者者通通过过代代码码改改变变了了Text属属性性的的设设置置时时，将触发其将触发其Change事件。事件。6.4列表框与组合框列表框与组合框 第6章 常用控件 40例例6.7列表框示例。列表框示例。设计一个畅销书设计一个畅销书排行榜程序。排行榜程序。用户界用户界面如右图。面如右图。例例6.8组合框示例。组合框示例。设计一个用于设设计一个用于设置字体属性的程序，置字体属性的程序，界面如右图所示。界面如右图所示。6.4列表框与组合框列表框与组合框 第6章 常用控件 411.用途用途时钟控件（时钟控件（Timer）

40、又称计时器、定时器控件，）又称计时器、定时器控件，用于用于有规律地定时执行指定的工作有规律地定时执行指定的工作，常常用于编写，常常用于编写不需要与用户进行交互就可直接执行的代码，如不需要与用户进行交互就可直接执行的代码，如计计时、倒计时、动画时、倒计时、动画等。等。在程序运行阶段，时钟控件不可见。在程序运行阶段，时钟控件不可见。6.5时钟控件时钟控件 第6章 常用控件 42 2属属性性（1）Interval属性属性取取值值范范围围在在064767，单单位位：为为毫毫秒秒（0.001秒秒），表表示示计计时时间间隔隔。若若将将Interval属属性性设设置置为为0或或负负数数，则则计计时时器器停停

41、止工作。止工作。缺省设置为缺省设置为0（2）Enabled属性属性设设置置为为True，而而且且Interval属属性性值值大大于于0，则则计计时时器器开开始工作始工作（以以Interval属性值为间隔，触发属性值为间隔，触发Timer事件事件）。）。设置为设置为False可使时钟控件无效，即计时器停止工作。可使时钟控件无效，即计时器停止工作。缺省设置为缺省设置为True6.5时钟控件时钟控件 第6章 常用控件 433方方法法 Timer控件没有方法控件没有方法。4事事件件 时钟控件只有时钟控件只有Timer事件事件 当当Enabled属性值为属性值为True且且Interval属性值大于属性

42、值大于0时，时，该事件以该事件以Interval属性指定的时间间隔发生属性指定的时间间隔发生常常将需要定时执行的操作放在常常将需要定时执行的操作放在Timer事件事件过程中过程中6.5时钟控件时钟控件 第6章 常用控件 44例例6.9设计一个倒计时程序，界面如图设计一个倒计时程序，界面如图6-13所示所示(Pg.187)补充例：动例画：补充例：动例画：滚动字幕滚动字幕常常用于编写不需要与用户进行交互就可直接常常用于编写不需要与用户进行交互就可直接执行的代码，如：执行的代码，如：计时器、倒计时、动画计时器、倒计时、动画等。等。时钟控件的应用举例时钟控件的应用举例6.5时钟控件时钟控件 第6章 常

43、用控件 456.6 6.6 控件数组控件数组 6.6.1控件数组的概念控件数组的概念一组相同类型的控件组成。一组相同类型的控件组成。它们共用一个控件名，具有它们共用一个控件名，具有相同的属性，建立时系统给每个元素赋一个唯一的索引号相同的属性，建立时系统给每个元素赋一个唯一的索引号(Index)。控件数组共享同样的事件过程，通过返回的下标控件数组共享同样的事件过程，通过返回的下标值区分控件数组中的各个元素。值区分控件数组中的各个元素。例：例：Private Sub cmdOK_Click(Index As Integer)三个命令按钮共享代段三个命令按钮共享代段 Select Case Inde

44、x Case 0 处理第一个命令按钮的操作处理第一个命令按钮的操作 Case 1 处理第二个命令按钮的操作处理第二个命令按钮的操作 Case 2 处理第三个命令按钮的操作处理第三个命令按钮的操作 End Select End Sub 第6章 常用控件 466.6.2控件数组的建立控件数组的建立一、在设计时建立控件数组的步骤：一、在设计时建立控件数组的步骤：1窗体上画出控件，进行属性设置，这是建立的第一个元素；窗体上画出控件，进行属性设置，这是建立的第一个元素；2选选中中该该控控件件，进进行行“Copy”操操作作若若干干次次和和“Paste”操操作作若若干干次建立了所需个数的控件数组元素。次建立

45、了所需个数的控件数组元素。3进行事件过程的编程。进行事件过程的编程。二、运行时添加控件数组的步骤如下二、运行时添加控件数组的步骤如下:6.6 6.6 控件数组控件数组 第6章 常用控件 471在在窗窗体体上上画画出出某某控控件件，设设置置该该控控件件的的Index值值为为0，表表示示该该控控件件为为数数组组,这这是是建建立立的的第第一一个个元元素素，并并可可对对一一些些取取值值相相同同的的属性进行设置，如所有文本框的字体都取一样大小。属性进行设置，如所有文本框的字体都取一样大小。2在在编编程程时时通通过过Load方方法法添添加加其其余余的的若若干干个个元元素素，也也可可以通过以通过Unload

46、方法删除某个添加的元素。方法删除某个添加的元素。Load方法和方法和Unload方法的使用格式：方法的使用格式：Load控件数组名控件数组名()Unload控件数组名控件数组名()其中，其中，为整型数据。表示控件数组的某个元素。为整型数据。表示控件数组的某个元素。3通过通过Left和和Top属性确定每个新添加的控件数组元素在属性确定每个新添加的控件数组元素在窗体的位置，并将窗体的位置，并将Visible属性设置为属性设置为True。6.6 6.6 控件数组控件数组 第6章 常用控件 48例例6.10设设计计一一个个IPIP电电话话拨拨号号程程序序，界界面面如如图图6-14所所示示。要要求求：单

47、单击击相相应应的的数数字字按按钮钮时时，标标签签的的内内容容会会发发生生相相应应变变化化。单单击击“清清除除”按按钮钮将将清清除除标标签签中中显显示示的的内内容容，单单击击“重重拨拨”按按钮钮将再现原来的拨号过程。将再现原来的拨号过程。6.6 6.6 控件数组控件数组例例6.11设设计计一一个个霓霓虹虹灯灯程程序序，界界面面如如图图6-15所所示示。要要求求：利利用用时时钟钟控控件件模模拟拟霓霓虹虹灯灯的的效果。效果。第6章 常用控件 496.7鼠标事件与键盘事件鼠标事件与键盘事件大大多多数数控控件件能能够够识识别别鼠鼠标标的的MouseMove、MouseDown和和MouseUp事事件件，

48、通通过过响响应应这这些些鼠鼠标标事事件件，能能在在应应用用程程序序对对鼠鼠标位置及状态的变化作出响应操作。标位置及状态的变化作出响应操作。MouseMove每当鼠标指针移动到屏幕新位置时发生每当鼠标指针移动到屏幕新位置时发生MouseDown按下任意鼠标键按钮时发生按下任意鼠标键按钮时发生MouseUp释放任意鼠标键按钮时发生释放任意鼠标键按钮时发生6.7.1鼠标事件鼠标事件 第6章 常用控件 50MouseMove、MouseDown、MouseUp三三个个事事件件的的过过程程的的语语法格式如下：法格式如下：SubObject_MouseMove（ButtonAsInteger，ShiftA

49、sInteger，_ _XAsSingle，YAsSingle）SubObject_MouseDown（ButtonAsInteger，ShiftAsInteger，_ _XAsSingle，YAsSingle）SubObject_MouseUp（ButtonAsInteger，ShiftAsInteger，_ _XAsSingle，YAsSingle）其中：其中：1Object是是可可选选的的一一个个对对象象表表达达式式，可可以以是是窗窗体体对对象象和和大大多多数可视控件。数可视控件。2Button参数是表示按下或松开鼠标哪个按钮，参数是表示按下或松开鼠标哪个按钮，6.7.1鼠标事件鼠标事件

50、 第6章 常用控件 51参数参数Button值值参数（参数（Button）值值说明说明vbLeftButton 1左按钮被按下左按钮被按下vbRightButton2右按钮被按下右按钮被按下vbMiddleButton4中间按钮被按下中间按钮被按下6.7.1鼠标事件鼠标事件 第6章 常用控件 52参数参数Shift值值参数（参数（Shift）值值描述描述vbShiftMask1SHIFT键被按下键被按下vbCtrlMask 2CTRL键被按下键被按下vbAltMask4ALT键被按下键被按下3通过通过Shift参数表示在参数表示在Button参数指定的按钮被按下参数指定的按钮被按下或者被松开的