背景故事：我正在使用
log4net处理我正在进行的项目的所有日志记录.可以在几种不同的情况下调用一种特定的方法 – 一些保证日志消息是错误,另一些保证日志消息是警告.
所以,作为一个例子,我怎么能转
Public Sub CheckDifference(ByVal A As Integer,ByVal B As Integer)
If (B - A) > 5 Then
log.ErrorFormat("Difference ({0}) is outside of acceptable range.",(B - A))
End If
End Sub
进入更多的方面：
Public Sub CheckDifference(ByVal A As Integer,ByVal B As Integer,"Some delegate info here")
If (B - A) > 5 Then
**delegateinfo**.Invoke("Difference ({0}) is outside of acceptable range.",(B - A))
End If
End Sub
所以我可以调用它并传递log.ErrorFormat或log.WarnFormat作为委托？
我在VS 2008和.NET 3.5 SP1中使用VB.NET.此外,我对一般的代表来说还是比较新的,所以如果这个问题措辞不同以消除任何含糊之处,请告诉我.
编辑：另外,我怎么能将委托初始化为类构造函数中的ErrorFormat或WarnFormat？它会像myDelegate = log.ErrorFormat一样简单吗？我认为还有更多的东西(原谅我对这个问题的无知 – 代表们真的是我想要了解更多的东西,但到目前为止他们已经没有理解我的理解).
声明您的代理签名：
Public Delegate Sub Format(ByVal value As String)
定义您的测试功能：
Public Sub CheckDifference(ByVal A As Integer,_
ByVal B As Integer,_
ByVal format As Format)
If (B - A) > 5 Then
format.Invoke(String.Format( _
"Difference ({0}) is outside of acceptable range.",(B - A)))
End If
End Sub
CheckDifference(Foo,Bar,AddressOf log.WriteWarn)
要么
CheckDifference(Foo,AddressOf log.WriteError)