你可以在VB中继承一个带有参数的子新（构造函数）吗？

Question

在下面的代码中我收到编译错误

Error Too many arguments to 'Public Sub New()'

在Dim TestChild As ChildClass = New ChildClass("c") 上。我没有在TestChild.Method1() 上收到它，即使它们都在我继承的基类上。

Public Class BaseClass
    Public ReadOnly Text As String
    Public Sub New(ByVal SetText As String)
        Text = SetText
    End Sub
    Public Sub New()
        Text = ""
    End Sub
End Class

Public Class ChildClass
    Inherits BaseClass
End Class

Public Class TestClass
    Sub Test()
        Dim TestChild As ChildClass = New ChildClass("c")
        TestChild.Method1()
    End Sub
End Class

我可以将子类更改为：

Public Class ChildClass
    Inherits BaseClass
      Public Sub New (ByVal SetText As String)
      MyBase.New(SetText)
    End Class
End Class

如下所示，但我不必为方法 1 或其他继承的方法这样做，我正在寻找尽可能干净的代码。这可能是系统中继承参数化 New 语句的限制，但我无法在任何地方找到它的文档。如果需要，那么我想查看文档。

Answer 1

您看到的行为是“设计使然”。子类不会从其基类型继承构造函数。子类负责定义它自己的构造函数。此外，它必须确保它定义的每个构造函数都隐式或显式调用基类构造函数或链接到同一类型的另一个构造函数。

您需要在所有子类上定义相同的构造函数，并通过 MyBase.New 显式链接回基本构造函数。示例

Class ChildClass
  Inherits BaseClass
  Public Sub New(text As String)
    MyBase.New(text)
  End Sub
End Class

您要查找的文档是 VB 语言规范的第 9.3.1 节。

• http://msdn.microsoft.com/en-us/library/aa711964(VS.71).aspx

我认为最相关的部分是以下（大致从第二页开始）

如果类型不包含实例构造函数声明，则会自动提供默认构造函数。默认构造函数只是调用直接基类型的无参数构造函数。

这并没有明确声明子类不会继承构造函数，但这是该声明的副作用。

Answer 2

参数化构造函数不能像实例方法一样被继承。您需要在子类中实现构造函数，然后使用 MyBase 调用父类的构造函数。

Public Class ChildClass
    Inherits BaseClass

    Public Sub New (ByVal SetText As String)
      MyBase.New(SetText)
    End Class
End Class

Public Class TestClass
  Public TestChild AS New ChildClass("c")
End Class

此限制不是 VB 特有的。据我所知，这在 C#、Java 或 C++ 中肯定是不可能的。

这是一篇与 C++ 相同问题的相关帖子：
c-superclass-constructor-calling-rules