P001 親クラスの SUB NEW に引数があります。子クラスの SUB NEW にも引数が必要です: <クラス名>

Sub New のない派生クラスが定義されています。それに対応するベースクラスの Sub New に引数が必要であれば、派生クラスはそれらの引数を与える Sub New を持たなければなりません。以下に例を示します。

Class BaseClass
   Sub New (X As Integer)
   End Sub
End Class
Class DerivedClass As BaseClass
End Class
Dim ObjRefVar As New DerivedClass     ' Illegal because BaseClass's
                                      ' Sub New needs to be passed an 
                                      ' integer.

派生クラスの Sub New を、ベースクラスの Sub New に必要な引数を含むものとして定義してください。以下に例を示します。

Class BaseClass
   Sub New (X As Integer)
   End Sub
End Class
Class DerivedClass As BaseClass
   Sub New (X As Integer)
   End Sub
End Class
Dim ObjRefVar As New DerivedClass(5)     ' Legal