5-2.doc-呼伦贝尔学院.doc

呼伦贝尔学院—— 计算机科学与技术学院 教学目标：了解面向对象程序设计方法的基本原理及主要特点——抽象性、封装性、继承性、多态性。掌握类和对象的概念以及如何用类来解决具体问题并在类的基础上如何派生出新类,以及重载的概念和作用。。 教学类型：在多媒体教室直观讲授，引导学生进行类的操作。 教学内容： 复习上次课5.5类的继承 Visual Basic.NET支持类的继承，允许用户定义一个类，作为其他类继承的依据，继承类能够继承，扩充基本类的属性和方法，继承类也可以重载基本类的一些方法。 例如，把窗体看成一个类，在Vissal Basic.NET中用户可以根据现有的窗体继承出一个新的窗体。其中已有类叫做基类（父类），继承的新类叫做派生类（子类）。 1、实现基本的继承 下面通过例子进一步说明为什么要使用继承。 要描述人和雇员，对于每一个人来说都有姓名、年龄、性别等信息，对于公司雇员有以上内容以外还有雇员的工作部门及薪水等信息。当分开来实现这两个类的时候，就会发现其实它们有许多相同之处。如果分开编写这两个类的代码，不仅编写效率低，而且程序代码也难以维护，所以最好的方法就是让它们使用一些相同的代码，此时继承就可以发挥作用了。使用继承，可以创建一个Person类（基类），它包含了name（姓名）、age（年龄）、sex（性别）等属性所有的共享代码。然后再创建employee派生类，这个类是由person类继承而来的，这样它们就可以自动地获得所有的公用代码了。 【例5.3】建立person类及它的派生类employee类。 Public Class person Public sname, Iage, ssex Public Property name() As String Get Return sname End Get Set(ByVal value As String) sname = value End Set End Property Public Property age() As Integer Get Return Iage End Get Set(ByVal value As Integer) Iage = value End Set End Property Public Property sex() As String Get Return ssex End Get Set(ByVal value As String) ssex = value End Set End Property End Class Public Class employee Inherits person Dim Ssalary As Single Public Property salary() As Single Get Return Ssalary End Get Set(ByVal value As Single) Ssalary = value End Set End Property Sub Displayemployee() Debug.WriteLine(雇员的姓名： name) Debug.WriteLine(雇员的性别： sex) Debug.WriteLine(雇员的年龄： age) Debug.WriteLine(雇员的薪水： salary) End Sub End Class Module Module1 Sub Main() Dim aemployee As New employee() aemployee.name = 王强 aemployee.sex = 男 aemployee.age = 25 aemployee.salary = 3600.0 aemployee.Displayemployee() End Sub End Module 2、禁止继承 在默认状态下，创建的任何类都是可