VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > VB.net教程 >

  • 在VB.NET中处理构造函数时值得注意的两个陈述

　在VB.NET中处理构造函数时，有两个陈述值得注意：

　　(1) 如果类型不包含任何实例构造函数声明，则VB.NET提供默认的构造函数；
　　默认参数调用直接基类的无参数构造函数。如果基类没有可访问的无参数构造函数，则发生编译期错误。

　　(2) 构造函数不能继承；

　　陈述（1）包含两个方面的信息：①是如果类型不包含任何实例构造函数声明，则VB.NET提供默认的构造函数，即下面的声明是允许的，在类Shape中我们没有显式声明任何构造函数，但是我们仍然可以通过VB.NET自动提供的无参数构造函数New()来实例化类；
Module Test
    Public Sub Main()
        Dim shape1 As Shape = New Shape
    End Sub
End Module

Public Class Shape
    Public Sub Draw()
        'some codes here.
    End Sub
End Class

　　②是如果类型中包含有实例构造函数的声明，那么VB.NET不再提供默认的构造函数，例如，我们在类Shape中添加了一个带参数的构造函数，
Public Class Shape
    Private _pt As Point
    Public Sub New(p As Point)
        _pt = p
    End Sub
    Public Sub Draw()
        'some codes here.
    End Sub
End Class

　　那么，如果直接实例化类时，则会产生错误；
    Dim shape1 As Shape = New Shape

　　只能通过调用Shape类中显式声明的带参数的构造函数来实例化类，如下，
    Dim shape1 As Shape = New Shape(New Point(0, 0))

　　因此，如果要在类中同时使用无参数和带参数的构造函数，必须同时显式地声明两种构造函数。
Public Class Shape
    Private _pt As Point
    Public Sub New()
        'some codes here.
    End Sub
    Public Sub New(p As Point)
        _pt = p
    End Sub
    Public Sub Draw()
        'some codes here.
    End Sub
End Class


　　陈述（２），构造函数不能继承，即，如果要使子类与基类有相同的构造函数，那么必须在每个子类中都显式的声明与基类构造相同的构造函数，例如：
Public MustInherit Class Shape
    Private _pt As Point
    Public Sub New()
        'some codes here.
    End Sub
    Public Sub New(p As Point)
        _pt = p
    End Sub
    Public MustOverride Sub Draw()
End Class

Public Class Line
    Inherits Shape
    Public Sub New()
    End Sub
    Public Sub New(p As Point)
        MyBase.New(p)
    End Sub
    Public Overrides Sub Draw()
        'some codes here.
    End Sub
End Class


　　这一点非常重要而且也很有意义。因为我们往往倾向于认为子类继承了基类所有的属性和方法，这往往导致我们的程序出现编译错误。

　　综合以上两个陈述，在实际编程中应遵循一个原则：在类中，无论是基类还是子类，显式地声明所有需要的无参数或带参数构造函数。遵循这个原则，既有利于提高编译正确代码的速度，也有利于自己和其他程序员理解代码。

出处：https://www.cnblogs.com/zsi/archive/2005/02/02/100971.html


相关教程