面向对象编程基础

1、 面向对象编程基础本章内容：本章内容： 对象对象 控件的属性和方法控件的属性和方法 控件的事件控件的事件 程序设计步骤程序设计步骤本章重点：本章重点：VBVB控件的属性、方法和事件控件的属性、方法和事件本章难点：本章难点：类、对象、属性、事件、方法的概念类、对象、属性、事件、方法的概念对象和控件一、对象、类的概念一、对象、类的概念1. 1. 对象对象 对象是具有特殊属性（数据）和行为方式（方法）的实对象是具有特殊属性（数据）和行为方式（方法）的实体，体，如窗体、各种控件等。如窗体、各种控件等。 类是一个抽象的概念，是用来创建对象的模板，它包括类是一个抽象的概念，是用来创建对象的模板，它包括所创

2、建对象的状态描述和方法定义，而对象只是类的一个实所创建对象的状态描述和方法定义，而对象只是类的一个实例。例。 2. 2. 常用的对象类型常用的对象类型v窗体窗体v控件控件v数据库数据库v外部程序提供的对象外部程序提供的对象v自定义对象：由自定义对象：由自定义类产生的对象自定义类产生的对象VB中的控件中的控件内部标准控件内部标准控件 VB工具箱中列出的控件，如文本框、命令按钮等。工具箱中列出的控件，如文本框、命令按钮等。ActiveX控件控件 对标准控件的扩充，不自动显示在工具箱中，使用时进对标准控件的扩充，不自动显示在工具箱中，使用时进行加载。一般以扩展名为行加载。一般以扩展名为.ocx的文件

3、独立存在。的文件独立存在。 如通用对话框、多媒体控件等。如通用对话框、多媒体控件等。给对象命名给对象命名v对象名称在同一作用域内必须保证唯一性。对象名称在同一作用域内必须保证唯一性。v窗体或控件对象在设计时窗体或控件对象在设计时VB会自动提供一个会自动提供一个缺省的名称。缺省的名称。v对象名称在属性窗口中的对象名称在属性窗口中的“名称名称”栏指定。栏指定。v对象命名最好表示数据的含义，并加一个前缀对象命名最好表示数据的含义，并加一个前缀来表示对象的类型。如：来表示对象的类型。如：frmMainfrmMain、cmdOpencmdOpen、textAddresstextAddress等。等。描述

4、对象的三个基本要素描述对象的三个基本要素 属性、事件和方法属性、事件和方法是描述对象的三个基本是描述对象的三个基本要素要素对象有不同的特征，特征就是属性。每种属性有属性名称和特定对象的属性值。对象有不同的特征，特征就是属性。每种属性有属性名称和特定对象的属性值。1.1. 名称名称NameName属性属性即属性窗口中的即属性窗口中的“名称名称” 。唯一标识该控件，所有控件都有此属性。唯一标识该控件，所有控件都有此属性2. Height, Width, Left, Top2. Height, Width, Left, Top属性属性LeftLeft：返回或设置控件左边与其容返回或设置控件左边与其容

5、器左边之间的距离器左边之间的距离TopTop：返回或设置控件顶部与其容器返回或设置控件顶部与其容器顶边之间的距离顶边之间的距离WidthWidth：返回或设置控件的宽度返回或设置控件的宽度HeightHeight：返回或设置控件的高度返回或设置控件的高度注意：注意：这里所指的都是相对于容器这里所指的都是相对于容器的坐标，而不是屏幕的绝对坐标的坐标，而不是屏幕的绝对坐标单位为单位为twiptwip( (缇缇) )：1 twip=1/201 twip=1/20点点=1/1440=1/1440英寸英寸=1/567cm =1/567cm 控件的通用属性控件的通用属性3. ForeColor3. For

6、eColor、BackColorBackColor和和FontFont属性属性ForeColor ForeColor ：返回或设置在控件内显示的图片和文本的前景颜色返回或设置在控件内显示的图片和文本的前景颜色BackColor BackColor ：返回或设置控件的背景颜色返回或设置控件的背景颜色Font Font ：返回或设置控件的文字字体返回或设置控件的文字字体 程序中设置颜色，有两种方法程序中设置颜色，有两种方法 使用颜色常量使用颜色常量：vbBlack, vbBlue, vbGreenvbBlack, vbBlue, vbGreen，VbRedVbRed， vbWhitevbWhite

7、，VbYellowVbYellow，vbcyan(vbcyan(青色青色) )，vbMagenta(vbMagenta(紫红色紫红色) ) form1.BackColor = vbBlue form1.BackColor = vbBlue 使用使用RGBRGB（R,G,BR,G,B）函数。红、绿、蓝取值在）函数。红、绿、蓝取值在0 0255255，如黄色为，如黄色为（255255，255255，0)0) form1.BackColor = RGB(255,0,0)form1.BackColor = RGB(255,0,0)控件的通用属性控件的通用属性 多个与字体有关的控件属性多个与字体有关的控

8、件属性FontNameFontName（字体名）（字体名） Form1.FontName = Form1.FontName = “黑体黑体”FontSizeFontSize（字体大小）（字体大小）Form1.FontSize = 24Form1.FontSize = 24FontBoldFontBold（是否加粗）（是否加粗）Form1.FontBold = TrueForm1.FontBold = TrueFontItalicFontItalic（是否斜体）（是否斜体）、FontUnderlineFontUnderline（是否加下划线）、（是否加下划线）、FontStrikethruFon

9、tStrikethru（是否加删除线）（是否加删除线） FontFont属性属性是一个对象类型是一个对象类型，字体的各种定义也可由该对象的不同属性，字体的各种定义也可由该对象的不同属性来控制，如：来控制，如：Form1.Font.Name = Form1.Font.Name = “黑体黑体” Form1.Font.Size=12Form1.Font.Size=12Form1.Font.Bold = TrueForm1.Font.Bold = True控件的通用属性控件的通用属性4. 4. 控件的值控件的值与控件的值有关的属性大致有三个：与控件的值有关的属性大致有三个： CaptionCapti

10、on 返回或设置窗体和控件的标题返回或设置窗体和控件的标题 FrameFrame, , LabelLabel, , OptionButtonOptionButton, , CommandButton,CheckBoxCommandButton,CheckBox, , DataData等等控件有此属性。控件有此属性。 Text(Text(待讲待讲) )TextboxTextbox, , ListList, , ComboBoxComboBox等控件使用该属性设置控件的动态文本。等控件使用该属性设置控件的动态文本。通常有通常有TextText属性时，也会有属性时，也会有SelTextSelText

11、, , SelStartSelStart, , SelLengthSelLength属性属性。 Value Value (待讲待讲)CommandButton,CheckBoxCommandButton,CheckBox和和OptionButtonOptionButton控件使用该属性记录控件的控件使用该属性记录控件的状态。状态。控件的通用属性控件的通用属性5. 5. 控件可用与可见控件可用与可见 EnabledEnabled 返回或设置控件是否可用，取值为返回或设置控件是否可用，取值为 TrueTrue（可用）（可用） 或或 FalseFalse Command1.Enabled = Fal

12、seCommand1.Enabled = False VisibleVisible 返回或设置控件是否可见，取值为返回或设置控件是否可见，取值为 TrueTrue（可见）（可见） 或或 FalseFalseCommand1.Visible = FalseCommand1.Visible = False6.6.控件输入的顺序控件输入的顺序(待讲待讲) TabIndex TabIndex ：设置：设置TabTab键的顺序，该属性决定控件在一个窗体中的输键的顺序，该属性决定控件在一个窗体中的输入顺序，取值为整型。入顺序，取值为整型。 TabStopTabStop ：设该值决定是否可以通过设该值决定是

13、否可以通过TABTAB键将焦点从上一个焦点移键将焦点从上一个焦点移动当前控件。取值为动当前控件。取值为 TrueTrue（可以移动焦点）（可以移动焦点） 或或 FalseFalse控件的通用属性控件的通用属性方法就是可以对对象执行的操作。它是系统提供的一种特殊函数或过方法就是可以对对象执行的操作。它是系统提供的一种特殊函数或过程，用于完成某种特定功能。程，用于完成某种特定功能。比如窗体可以移动，就是一个比如窗体可以移动，就是一个move方法，如何移动，就是该方法的参数方法，如何移动，就是该方法的参数。事实上，方法就好比一个事实上，方法就好比一个函数或过程。函数或过程。 方法的使用形式方法的使用

14、形式: : 对象对象.方法方法 参数参数 MoveMove方法：方法：移动控件，或改变控件大小移动控件，或改变控件大小对象名对象名.Move .Move Left ,Top ,Width ,HeightLeft ,Top ,Width ,Height举例：举例：form1.move 0, 0 移动窗体到屏幕左上角移动窗体到屏幕左上角 Command1.move 0,0,2000,1000Command1.move 0,0,2000,1000SetFocusSetFocus方法：方法：使控件获得焦点。使控件获得焦点。如果控件无效或不可见，使用该方法会出错。如果控件无效或不可见，使用该方法会出错。

15、一般通过窗体的一般通过窗体的ActivateActivate事件设置焦点。事件设置焦点。举例：举例：Text1.setfocusText1.setfocus控件的方法控件的方法事事 件件：预先定义好的、能够被对象识别的动作。：预先定义好的、能够被对象识别的动作。 事件过程事件过程：为响应特定事件而执行的指令，是窗体的代码部分。：为响应特定事件而执行的指令，是窗体的代码部分。事件过程的一般格式如下：事件过程的一般格式如下：Private Sub Private Sub 对象名称对象名称_ _事件名称（）事件名称（） 事件响应程序代码事件响应程序代码End subEnd sub控件的事件1.1.

16、Click : Click :单击事件单击事件2.2. DblClickDblClick：双击事件双击事件3.3. KeyPress(KeyPress(参数参数) )：按下一个对应某按下一个对应某ASCIIASCII字符的键时字符的键时, ,触发该事件。控触发该事件。控制键中只能识别：制键中只能识别：EnterEnter、TabTab、SpaceSpace、BackspaceBackspace等。等。 Private Sub Text1_KeyPress(KeyAscii As Integer)Private Sub Text1_KeyPress(KeyAscii As Integer) pr

17、int KeyAsciiprint KeyAscii End Sub End Sub4.4. KeyDown KeyDown（参数）（参数）和和KeyUPKeyUP（参数）（参数） 键盘中任意键只要按下，就产生键盘中任意键只要按下，就产生KeyDownKeyDown事件，松开时产生事件，松开时产生KeyUpKeyUp事件，事件，有键值和控制键状态两个参数。有键值和控制键状态两个参数。5.5. ChangeChange事件事件 当控件的的值发生改变时会引发该事件，包括文本框、组合列表框、当控件的的值发生改变时会引发该事件，包括文本框、组合列表框、滚动条、驱动器和目录列表等。滚动条、驱动器和目录列

18、表等。VB控件通用事件VB控件通用事件6. MouseMove6. MouseMove（参数）（参数）当鼠标在控件上移动时，引发该事件当鼠标在控件上移动时，引发该事件7. MouseDown 7. MouseDown （参数）和（参数）和MouseUP MouseUP （参数）（参数）鼠标任何键按下和松开会产生鼠标任何键按下和松开会产生MouseDownMouseDown和和MouseUpMouseUp事件事件8. GotFocus8. GotFocus和和LostFocusLostFocus当控件接受到输入焦点时，引发当控件接受到输入焦点时，引发GotFocusGotFocus事件事件当控件失去输入焦点时，引发当控件失去输入焦点时，引发LostFocusLostFocus事件事件 举例：设置文本框举例：设置文本框Text1Text1的的GotFoucusGotFoucus事件，当事件，当Text1Text1获得焦点时，获得焦点时，自动清空自动清空Private Su