↓共通処理クラス Public MustInherit Class hoge Try Me.Load() Catch ex As Exception Finally End Try
Public MustOverride Function Load()
Public Function 特有処理() End Function ※引数の種類だけ特有処理を記述 Public Function 特有処理(ByVal str As String) End Function Public Function 特有処理(ByVal str As String, ByVal i As integer) End Function
↓特有処理クラス Public Class 特有処理(1) Inherits hoge Public Overrides Function Load() 特有処理( "TEST" ) End Function
Public Shadows Function 特有処理(ByVal Tag As String) 特有の処理を行う End Function End Class