《中文Visual Basic 6.0基础教程 教学课件 ppt 作者 郭政 第6章 内 部 控 件》由会员分享，可在线阅读，更多相关《中文Visual Basic 6.0基础教程 教学课件 ppt 作者 郭政 第6章 内 部 控 件（198页珍藏版）》请在金锄头文库上搜索。
1、第6章 内 部 控 件,6.1 【案例20】“工资数据输入卡”程序,6.1.1 控件分类、焦点和Tab键的顺序 1控件分类 控件可分为内部控件和外部控件两大类。内部控件是Visual Basic提供的控件，显示在工具箱中，不可删除。内部控件又分为一般类、选择类和图形图像类控件。,在一般类控件中有标签、文本框、命令按钮和时钟等。外部控件可分为Activex控件和可插入对象。Activex控件是由系统或第三方提供的，这些控件通常都是针对某一具体问题提供强大的功能，例如，播放影片的MediaPlayer控件、可提供Windows通用对话框的CommnoDialog控件、可连接数据库的ADO控件等。,
2、可插入对象是由系统其他应用程序提供的，如Word 2000的Ducoment（文档对象）等。,（1）什么是焦点（FOCUS）：焦点决定了在任何时间由哪一个对象接收鼠标单击或键盘输入的信息。只有当对象具有焦点时，才可以具有接收鼠标单击或键盘输入的能力。在Windows环境中，可以有多个应用程序、多个窗口、多个控件对象，但在同一时间焦点只有一个。,2焦点,“具有焦点”的对象通常会以突出显示标题或标题栏来表示。焦点的定位可由用户来完成，也可由程序代码来完成。例如，当同时运行多个应用程序时，只有具有焦点的应用程序才具有激活的标题栏，并能接收键盘的输入。,当打开多个窗体时，只有具有焦点的窗体才是活动窗体
3、。在活动窗体中，任一时刻都将只有一个控件具有焦点，即处于激活状态，并能接受键盘的输入。只有当活动窗体的所有控件都不具有焦点时，窗体才具有焦点。,对于某些对象，是否具有焦点可以通过某些特征看出来。例如，当某个命令按钮具有焦点时，按钮周围的边框将突出显示。,（2）对象接收焦点的条件：对于某一对象能否接收焦点，取决于该对象的Enabled和Visible属性的取值。Enabled属性允许对象响应键盘、鼠标等事件。Visible属性则决定对象是否显示在屏幕上。只有这两个属性的取值同时均为Tree时，该对象才能接收焦点。,注意 Frame（框架）控件、Label（标签）控件、Menu（菜单）控件、Lin
4、e（线形）控件、Shape（形状）控件、Image（图像）控件和Timer（时钟）控件都不能接收焦点。,（1）什么是Tab键的顺序：当按下Tab键时，焦点在窗体中各控件之间移动的顺序即为Tab键的顺序。每个窗体都具有相应的Tab键的顺序。在默认情况下，Tab键的顺序与控件对象的建立顺序相同。,3Tab键的顺序,例如：依次建立了三个名字分别为Textl、Text2和Text3的文本框。当执行应用程序时，Textl首先具有焦点。当按下Tab键时，焦点将按照控件建立的顺序在控件间移动，即按一下Tab键，焦点将从Textl移至Text2，再按一下Tab键，焦点将从Text2移至Text3。,（2）改变
5、Tab键的顺序：通过设置控件对象的Tablndex属性值可以改变Tab键的顺序。如果一个控件的Tab键顺序位置发生了改变，其他控件的Tab键顺序位置将被自动重新编号。,对于不能接收焦点的控件对象，无效的和不可见的控件，以及TabStop属性设为False的对象，不会被包含在Tab键顺序中。当按下Tab键时，这些控件将被自动跳过。,由于在Windows和Windows的应用程序中，某一时刻只能有一个窗体或控件对象具有焦点，所以当窗体或控件对象失去焦点或获得焦点时，会产生相应的事件。,4与焦点有关的事件和方法,（1）Validate事件：在焦点转换到下一个控件对象之前发生，此时该控件的Causes
6、Validation属性值应设置为True。它的语法格式如下：,【格式】Private Sub Object_Validate（KeepFocus As Boolean） 其中，Object是对象名称，KeepFocus值用来确定控件是否失去焦点。它设置为True时，控件对象保持焦点。只有在即将获得焦点的控件对象的CausesValidation属性值设置为True时，Validate事件才发生。,Validate 事件和CausesValidation属性配合工怍，可防止控件失去焦点，直到满足要求为止。,（2）LostFocus（失去焦点）事件：当一个窗体或对象失去焦点，而另一个窗体或对象获
7、得焦点时，原来具有焦点的窗体或控件对象将产生LostFocus事件。,（3）GotFocus事件：当一个窗体或对象获得焦点时，会触发GotFocus事件。 可见，当对象得到焦点时，将激发GotFocus事件；反之，当对象失去焦点时，将激发LostFocus事件。多数控件都支持这两个事件。,（4）SetFocus方法：利用它可以将焦点移到指定的文本框中。该方法还可以用于ChedkBox（复选框）、CommandButton（命令按钮）和ListBox（列表框）等控件。SetFocus方法使用的格式是：对象名称.SeTFocus。,滚动条（ScrollBar）控件主要用来滚动显示在屏幕上的内容，它
8、分为水平滚动条 （HscrollBar）和垂直滚动条（VscrollBar），二者只是滚动方向不同。滚动条控件通常与某些不支持滚动的控件配合使用，以根据需要对内容进行滚动。,6.1.2 滚动条控件,1滚动条控件的常用属性 滚动条的许多属性与前面介绍的控件属性一样。下面介绍其他一些常用的属性。 （1）Value属性,【格式】Object.Value=number 【功能】用来返回或设置滚动块在滚动条中的位置，其取值为数值型数据。 【说明】Object表示滚动条对象名称，number表示一个介于滚动条控件的Min属性和Max属性取值之间的整数，用来设置滚动块在滚动条中的位置。,当其取值等于Min属
9、性值时，滚动块位于水平滚动条的最左端或垂直滚动条的最上端；当其取值等于Max属性值时，滚动块位于水平滚动条的最右端或垂直滚动条的最下端。,在设计时，设置Value属性的值主要用来设定程序运行后滚动块的初始位置。在程序运行时，可通过拖曳滚动块或单击滚动条箭头等方法来改变Value的属性值，以及获取Value的值。,（2）LargeChange属性 【格式】Object.LargeChange=number 【功能】用来设置用鼠标单击滚动条区域时，或按PageUp或Page Down键时，滚动条的Value值最大变化量。其取值number为数值型数据，默认值为 5。,（3）SmallChange属
10、性 【格式】Object.SmallChange=number 【功能】设置用鼠标单击滚动条的左右箭头时，滚动条的Value值最小变化量。它的取值number为数值型数据，默认值为1。,（4）Max属性 【格式】Object.Max=number 【功能】设置当滚动块位于水平滚动条最右端或者垂直滚动条最下端时的值。其取值number为数值型数据。Number的取值范围为32 76832 767的数值。,（5）Min属性 【格式】Object.Min=number 【功能】设置当滚动块位于水平滚动条最左端或者垂直滚动条最上端时的值。其取值number为数值型数据。Number的取值范围是-327
11、6832767之间的数值。,滚动条的事件有很多，例如Click、DblClick、Scroll和Change等。下面介绍最常用的Scroll事件和Change事件。注意：在这两个事件中应避免使用 MsgBox 语句和函数。,2滚动条的常用事件,（1）Scroll事件：用鼠标拖曳滚动条的滚动块时，此事件发生。在用鼠标拖曳滚动条的滚动块时，滚动条的Value属性值随之立即变化。,（2）Change事件：用鼠标拖曳滚动块后松开鼠标左键，单击滚动条或滚动箭头，使滚动块重定位时，或通过代码改变滚动条的Value属性值时，该事件产生。所以在用鼠标拖曳滚动条的滚动块时，滚动条的Value属性值不变化，只有当
12、松开鼠标左键后，滚动条的Value属性值才变化。,Change事件过程可协调在各控件间显示的数据或使它们同步。例如：可用一个滚动条的Change事件过程更新一个滚动条的Value属性值和在一个工作区里显示数据。,1什么是控件数组 控件数组是由一组相同类型的控件组成。它们共用一个相同的控件名称（即“名称”属性必须相同），具有基本相同的属性设置。当建立控件数组时，系统给每个元素赋予了一个唯一的索引号（Index），即下标，下标值由Index属性指定。,6.1.3 控件数组,通过“属性”窗口的Index属性，可以知道该控件的下标是多少，第1个下标是0。也就是说，控件数组的名字由“名称”属性指定，而数
13、组中的每个元素则由Index属性指定。例如：控件数组BN(4)表示名称为BN的控件数组中的第5个元素。在设计阶段，可以改变控件数组元素的Index属性，但不能在运行时改变。,控件数组适用于若干个控件执行相似操作的场合，它通过数组名和括号中的下标来引用。控件数组共享同样的事件过程。例如，控件数组BN有4个命令按钮，不管单击哪个命令按钮，都会调用同一个事件过程。与普通数组一样，控件数组的下标也在圆括号中，例如BN(0)。为了区分控件数组中的各个元素，Visual Basic会把下标值传送给过程。,例如，单击上述控件数组中的任意命令按钮时，会调用如下的事件过程。通过按钮的Index属性,可以确定用户
14、单击了哪个按钮，并可在对应的过程中进行有关的编程。例如：下面这段程序段表示了，如果单击了BN(1)按钮，则该按钮的上边会显示“单击的是第2个按钮”文字。,Private Sub BN_Click(Index As Integer) If Index=1 then BN(Index).Caption= “单击的是第2个按钮” Endlf End Sub,（1）在进行复制粘贴时创建控件数组的步骤如下。 在窗体上创建一个控件对象，可进行控件名称的属性设置，这是创建的第1个控件数组元素。选中该控件对象，将选中的控件对象复制到剪贴板中。,2创建控件数组的方法,选中控件数组元素所在的窗体，再进行“粘贴”操
15、作，在进行粘贴操作时，会弹出一个提示框，例如：控件元素为按钮的提示框如图6-1-1所示。,图6-1-1 提示框,单击“是”按钮后，就建立了一个控件数组元素；单击“否”按钮，则放弃创建控件数组的操作，只是粘贴了一个控件对象，Visual Basic系统自动将它的名字进行修改（序号自动增加）。 再进行若干次粘贴操作，就建立了所需个数的控件数组元素。,（2）在给控件对象命名时创建控件数组的步骤如下。 在窗体上创建作为数组元素的各个控件对象。 单击要包含到数组中的某个控件，将其激活。再进行控件名的属性设置（例如将它命名为“按钮”），这是创建的第一个控件数组元素。,单击要包含到数组中的另一个控件，再在其
16、“属性”窗口内“名称”属性栏中改变它的名称，使它的名称与第一个控件的名称一样。此时也会弹出一个提示框。单击“是”按钮后，就建立了一个控件数组元素。再进行若干次粘贴操作后，就建立了所需个数的控件数组元素。,（3）将几个相同类型控件的Index属性设置为不同的非零数值，再将它们的名称改为一样。 （4）运行程序时创建控件数组的步骤如下。,在窗体上创建作为数组元素的一个控件对象，设置该控件对象的Index属性值为0，表明该控件对象为数组，也可以进行控件对象名称的设置（例如将它命名为“按钮”）。这是创建的第1个控件数组元素。,在程序中，使用Load语句添加多个控件数组的其他数组元素；也可以通过使用UnLoad语句删除一些后添加的数组元素。Load语句和UnLoad语句的格式如下： 【格式】Load 对象名称（Index数值） 【格式】UnLoad 对象名称（Index数值）,在程序中，利用控件数组元素的Left、Top、Width和Height属性来确定每个添加控件数组元素的位置和大小等。同时，将它们的Visible属性设置为True,使它们可见。T
