Public MustInherit Class huge Implements hoge フィールド宣言 ←特有処理で使われる引数の種類分だけフィールドを作成 Sub Syori() Implements hoge.Syori Try Me.MainSyori() ←ここのTry句以外に、共通に使用するコードを記述 Catch ex As Exception End Try Public MustOverride Function MainSyori() End Class
Public Class 特有処理(1) ←特有処理の種類だけクラスを生成 Inherits huge Public Sub Set引数(ByVal Test As String) ←その特有処理に必要な引数のみを受け取りSETする フィールドに値をセット End Function Public Overrides Function MainSyori() 特有処理(1)を行う End Function End Class
