在下面的代码中,我收到编译错误
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 语句的限制,但我无法在任何地方找到它的文档。如果需要,那么我想查看文档。