VB.NET构造函数实际处理方式-编程学习网

这篇文章给大家介绍VB.NET构造函数实际处理方式，内容非常详细，感兴趣的小伙伴们可以参考借鉴，希望对大家能有所帮助。

在开发领域，已经出现了许多种开发语言供编程人员随自己的需求进行选择应用。比如VB.NET语言就可以对有特定需求的开发人员进行一定的帮助。VB.NET构造函数进行处理的时侯，有两个陈述值得注意：

VB.NET控件数组问题相关解决方案解析
闲谈VB.NET cstr函数性能特点
VB.NET连接数据库相关操作技巧介绍
深入剖析VB.NET验证LDAP用户身份
详细解读VB.NET实现Singleton模式操作步

(1) 如果类型不包含任何实例构造函数声明，则VB.NET提供默认的构造函数；

默认参数调用直接基类的无参数构造函数。如果基类没有可访问的无参数构造函数，则发生编译期错误。

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

陈述（1）包含两个方面的信息：

①是如果类型不包含任何实例构造函数声明，则VB.NET提供默认的构造函数，即下面的声明是允许的，在类Shape中我们没有显式声明任何构造函数，但是我们仍然可以通过VB.NET自动提供的无参数构造函数New()来实例化类；

Module TestModule Test
Public Sub Main()Sub Main()
Dim shape1 As Shape = New Shape
End Sub
End Module
Public Class ShapeClass Shape
Public Sub Draw()Sub Draw()
'some codes here.
End Sub
End Class

②是如果类型中包含有实例构造函数的声明，那么VB.NET不再提供默认的构造函数，例如，我们在类Shape中添加了一个带参数的构造函数，

Public Class ShapeClass Shape   Private _pt As Point   Public Sub New()Sub New(p As Point)   _pt = p   End Sub   Public Sub Draw()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 ShapeClass Shape   Private _pt As Point   Public Sub New()Sub New()   'some codes here.   End Sub   Public Sub New()Sub New(p As Point)   _pt = p   End Sub   Public Sub Draw()Sub Draw()   'some codes here.   End Sub   End Class

陈述（２），构造函数不能继承，即，如果要使子类与基类有相同的构造函数，那么必须在每个子类中都显式的声明与基类构造相同的构造函数，例如：

Public MustInherit Class 
ShapeClass Shape   
Private _pt As Point   
Public Sub New()Sub New()   
'some codes here.   
End Sub   
Public Sub New()Sub New(p As Point)   
_pt = p   
End Sub   
Public MustOverride Sub Draw()Sub Draw()   
End Class   
Public Class LineClass Line   
Inherits Shape   
Public Sub New()Sub New()   
End Sub   
Public Sub New()Sub New(p As Point)   
MyBase.New(p)   
End Sub   
Public Overrides Sub Draw()Sub Draw()   
'some codes here.   
End Sub   
End Class