Visual Basic.NET程序设计潘晓文电子教案 第7章.ppt

Visual Basic.NET程序设计潘晓文电子教案 第7章.ppt

  1. 1、本文档共45页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
面向对象的程序设计 7.1 面向对象的相关概念 7.2 定义类 7.3 对象 7.4 类的继承 7.5 Visual Basic 中的共享成员 7.6 事件 7.7 接口 7.1 面向对象的相关概念 7.2 定义类 7.3 对象 7.4 类的继承 7.5 Visual Basic 中的共享成员 7.6 事件 7.7 接口 (5)MyBase:当重写派生类中的方法时,可以使用MyBase关键字调用基类中的方法。在重写ShopingCart类的构造函数时使用了: MyBase.New(x) 调用了基类的构造函数,使得ShopingCart类的构造函数也有基类构造函数的相同功能。 (6)MyClass:该关键字使用户可以调用在类中实现的Overridable方法。 7.4.5 重载和重写 应注意重载和重写是不同的。重载和重写都是面向对象的关键技术。重载使用关键字OverLoad,而重写使用关键字Overridable和Overrides。 重载是在一个类中用相同的名称但是不同的参数类型创建一个以上的过程、函数、实例构造函数或属性。重载多发生在同一个类中,但也可以在继承类中使用。例如,在MerchandiseShelf类的构造函数New有3个,其中1个带参数,另外2个不带参数。在创建一个新对象时候,调用哪个构造函数取决于是否带参数以及带什么类型的参数。 重写是在派生类中定义1个与基类名称和参数相同,但功能不同的方法,用于覆盖基类原有的方法。 7.4.6 继承和作用域 当通过继承创建一个子类时,新类就从父类中得到了所有的Public(公共)和Friend(友元)方法、属性和字段。当然也有一个例外,就是New方法。构造函数必须在每一个子类中重新编写。派生类的构造函数的第一行必须是对基类构造函数的调用,除非基类有一个可访问的无参数构造函数。 如果在父类中声明一个Private(私有)的方法、属性和字段,那么在新的子类中就不能得到基类的这个方法、属性和字段。 有时,Public和Private关键字并不能满足要求。比如在MerchandiseShelf中定义的数组coll字段,若用Private关键字修饰,则它不能被子类继承;若用Public关键字来修饰,虽然能满足被子类继承的要求,但是却使得该数组能被外部代码所访问。Protected关键字修饰的方法、属性和字段,任何类外部的代码将不能调用,但可以被它的子类继承。因此,这种情况下coll数组需要用Protected关键字进行修饰。 7.4.7 New 和 Finalize 方法在类层次结构中如何工作 当创建派生类的实例时,基类的Sub New构造函数首先执行,然后执行派生类中的构造函数。这是因为Sub New构造函数中的第一行代码使用 MyBase.New( ) 语句调用直接父类的构造函数,然后再调用间接父类的构造函数,直到到达基类的构造函数。此时,基类构造函数中的代码先执行,接着按照继承顺序执行所有派生类中每个构造函数的代码。析构函数的执行顺序正好与构造函数相反。 7.4.8 面向对象程序设计实例 例7-7:在拥有本章上述的3个类的情况下,例3-1的程序设计如下。 Private Shelf As Merchandiseshelf Private Cart As ShopingCart Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _Handles MyBase.Load Shelf = New Merchandiseshelf(ListBox1.Items) Cart = New ShopingCart(ListBox2.Items) End Sub Private Sub ButAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _Handles ButAdd.Click添加按钮单击事件过程,货物架向购物车添加1件商品 Shelf.DelCount(ListBox1.SelectedIndex) 购物架所选商品数量减1 Cart.Add(ListBox1.SelectedItem) 购物车商品数量加1 Shelf.RefreshListBox(ListBox1.Items) 刷新购物架 Cart.RefreshListBox(ListBox2.Items) 刷新

您可能关注的文档

文档评论(0)

118压缩包课件库 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档