VB.NET質問ｽﾚ (Part22)

VB.NET質問ｽﾚ (Part22) at TECH

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

100:デフォルトの名無しさん
 07/07/15 21:36:35 
最初のコードでよかった件

101:デフォルトの名無しさん
 07/07/15 21:37:59 
>>99 
ああDoSomething()がとる引数は可変なんだね。 
その場合は、 
Public Sub Hoge(ByVal myDelegate As [Delegate], ByVal ParamArray params As Object()) 
　　Try 
　　　　myDelegate.DynamicInvoke(params) 
　　Catch ex As Exception 
　　　　............ 
 
みたいにすればいいんじゃない？（ご免、実際こういう処理はやったことがないので 
あんまり自信がない） 
 
後半の継承の話についてはおっしゃるとおり。 
処理によって必要な引数が変わるならやっぱり継承をつかった多態は向いてないかもね。

102:88
 07/07/15 22:22:06 
>>101 
そのような方法もあるんですね。 
ソースを参考にさせていただき、DynamicInvokeの方も勉強したいと思います。 
一応現段階では↓のような形になって、部品化も成功したと思います。 
（もし何かおかしなコードがあれば、ご指摘をお願いします） 
 
↓共通処理クラス 
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

次ページ