vb.NET中抽象類的重載構造函數

Question

我在vb.net中有兩個子類的抽象類。在抽象類我有一個constuctor，看起來像這樣：

Public Sub New(arg1 as String, arg2 as String) 
    Me.arg1 = arg1 
    Me.arg2 = arg2 
End Sub 

我想創建一個不帶任何參數，只是初始化參數傳遞給默認值的第二個構造函數。它應該是這樣的：

Public Sub New() 
    Me.arg1 = "123" 
    Me.arg2 = "456" 
End Sub 

當我嘗試使用第二個構造函數編譯器會抱怨我就是缺少有兩個參數的構造函數來創建一個新的子類....是否有一個原因，我不能重載抽象類中的構造函數？

謝謝

Answer 1

在VB中沒有「抽象」。如果你的意思是c＃意義上的抽象（VB中的MustInherit），那麼你需要在你的子類中定義兩個構造函數，因爲構造函數不是繼承的。

例子：

Public MustInherit Class SuperClass 
    Public Property ValueOne As String = String.Empty 

    Public Property ValueTwo As String = String.Empty 


    Public Sub New() 

     Me.New("123", "456") 

    End Sub 

    Public Sub New(ByVal tValueOne As String, ByVal tValueTwo As String) 

     Me.ValueOne = tValueOne 
     Me.ValueTwo = tValueTwo 

    End Sub  
End Class 



Public Class SubClass 
    Inherits SuperClass 


    Public Sub New() 

     MyBase.New() 

    End Sub 

    Public Sub New(ByVal tValueOne As String, ByVal tValueTwo As String) 

     MyBase.New(tValueOne, tValueTwo) 

    End Sub 

End Class 

Answer 2

如果你的第二個構造函數是在子類中，它必須調用基類的構造函數。

Public Sub New() 
    MyBase.New("123", "456") 
End Sub