新Visual Basic 2005程序设计 教学课件 丁爱萍 第9章 面向对象程序设计.pptVIP

第9章 面向对象程序设计 9.1 面向对象在VB 2005中的实现 9.1.1 类与对象 类是对具有相同属性和相同行为的一组相似对象的集合。类是用来创建对象的模板，它为属于该类的全部对象提供了统一的抽象描述，其内部包含状态描述和方法定义，而对象只是类的一个具体实例。 类本身没有属性值，也不能执行类方法，对类事件也不会做出任何响应。类定义了属性并包含了将被该类创建的每个对象所使用的方法的实现过程，这些对象将具有属性值并执行相应的方法。例如，在VB 2005中，工具箱上的控件表示类。当将控件工具箱拖放到窗体上时，实际上是在创建一个对象，即类的实例。 类通过设定该类中每个对象都具有的属性和方法来提供对象的定义，该属性和方法称为类的接口。 9.1.2 New子句 1. 创建对象实例的语法格式 使用New子句可以创建一个新的对象实例，其语法格式如下： [ Dim | Public | Friend | Private | Shared | Static | Protected ]〈变量名〉[ As New 〈控件名称〉] 2. 创建控件类举例 在窗体的Load事件中，创建一个Label类对象lbl，一个TextBox类对象txt。代码如下： Dim lbl As New Label Dim txt As New TextBox 设置这两个对象的属性，代码如下： With lbl .Text = 当前日期： .Font = New Font(楷体, 15) 设置字体也使用New子句，即生成新的Font类 .Width = 100 .Height = 30 .ForeColor = Color.Blue End With With txt .Text = Today .Font = New Font(楷体, 10) 设置字体也使用New子句，即生成新的Font类 .ForeColor = Color.Green .Focus() End With 在程序运行时，生成的控件对象最终需要在窗体上显示，即最终还是要将生成的控件对象添加到窗体上。代码如下： lbl.Location = New Point(50, 50) 新控件在窗体指定位置显示，即设置Location属性 txt.Location = New Point(150, 50) 指定位置使用Point对象数组 Me.Controls.Add(lbl) 向窗体添加对象调用Controls属性的Add方法 Me.Controls.Add(txt) 向窗体添加对象 3. 创建数据类型类实例 除了控件类之外，系统还提供了许多类，如每种数据类型就是一个类。例如： Dim a As New Integer Dim b As Integer=20 a = 10 说明： （1）使用New子句声明变量，表示运行Dim语句时创建该类的一个新实例，但在创建时不能被计算或赋予该变量的表达式。 （2）不使用New子句声明变量，表示运行Dim语句时创建该类的一个变量，可以在创建时被计算或赋予该变量的表达式。 （3）数组也是一个类，例如： Dim arr As Integer() arr = New Integer() {0, 1, 2, 3} 9.1.3 定义和添加类 1. 定义类 在VB 2005中，程序员可以自己定义类。类的实现包括两部分内容：类的说明和类的主体。其语法格式如下： [〈类说明修饰符〉] Class 〈类名〉 [〈类主体〉] End Class 【例9-1】声明一个类名是Student的类。 Public Class Student Public Name As String Public Sex As String Public Birthday As Date End Class 说明：这段代码声明了一个简单的类，它包含姓名、性别和出生日期三个成员变量，而没有任何方法和事件。 2. 添加类 VB 2005中的类是一个代码块，可出现在3个位置中： （1）放在窗体和模块文件中。在Windows窗体文件、Web窗体文件、模块文件中都可以定义类； （2）放在项目内的单独文件中。方法是：建立一个项目后，执行“项目”菜单→“添加类”命令，会打开“添加新项”对话框，在“模板”窗口中选择“类”，并在“名称”栏内输入要建立的类文件名，然后单击“添加”按钮。 （3）放在单独的项目中。当要建立的类比较多时，可以把相关的类放在一个“类库”项目中。 9.1.4 创建成员属性 1. 成员变量 成员变量和程序的一般变量一样，需要先声明。对于成员变量，主要通过以下几个关键字