起初,这看起来像一个简单的任务.我创建了一个带有明显的EnableHandler()和DisableHandler()例程的静态类,以及一个依赖于先前状态的行为的处理函数:如果已经请求中断,那么只需停下来返回,否则设置arg.Cancel并引发中断请求标志.因此,当基准测试开始时,它启用处理程序,然后检查每个主要周期的中断标志;完成后,如果需要,它会禁用处理程序并将中断请求传播到最顶层的调用者.
但是,这种方法只能运行一次:第一次删除处理程序后(无论是否曾经被触发),之后再次安装它不再有效 – 操作不会产生错误,但处理程序永远不会收到事件发生时控制.这是.NET事件处理中的预期行为吗?
在SO和其他论坛上有很多关于Console.CancelKeyPress的主题,但几乎没有人考虑删除处理程序,因此难怪它们没有遇到麻烦.尽管如此,在“How to use ConsoleCancelEventHandler several times”中提到了一些类似的(?)问题,但该应用程序是一个复杂的GUI前端,用于按需启动的几个外部控制台实用程序,并且该问题显然与第二次尝试添加处理程序时引发的显式异常相关联, – 这不是我的情况.
在得知各种.NET版本中与控制台操作相关的以前存在的错误之后,如果这种行为异常并且由.NET故障引起或者特定于Visual Basic(我不确定是否AddHandler和VB.NET中的RemoveHandler完全等同于C#中的=和 – =事件运算符.我目前在Windows 7 x86-64上使用.NET 4.5和Visual Basic 2012,并安装了所有可用的更新.
作为一种解决方法,我实际上不会删除DisableHandler()例程中的处理程序,而只是切换一个标志:当清除此标志时,处理程序立即返回,就像没有安装一样.但是,这种方法对我来说看起来很难看,我希望以适当的方式解决问题并实现目标.
PS. Chris Dunaway要求的当前代码:
' Usage example Dim fAbort As Boolean = False BreakHandler.Enable() For Each oImplementation As Implementation In oCompetition.Implementations Benchmark(oImplementation) If BreakHandler.AbortRequested() Then fAbort = True : Exit For Next BreakHandler.Disable() Return Not fAbort Public Class BreakHandler Protected Shared AbortFlag As Boolean = False Protected Shared HandlerInstalled As Boolean = False Protected Shared HandlerEnabled As Boolean = False Public Shared ReadOnly Property AbortRequested() As Boolean Get If AbortFlag Then AbortFlag = False Return True Else Return False End If End Get End Property Public Shared Sub Enable() If HandlerEnabled Then Return If Not HandlerInstalled Then AddHandler Console.CancelKeyPress, AddressOf Handler HandlerInstalled = True End If HandlerEnabled = True End Sub Public Shared Sub Disable() AbortFlag = False If Not HandlerEnabled Then Return ' This is where the handler was removed originally. 'RemoveHandler Console.CancelKeyPress, AddressOf Handler HandlerEnabled = False End Sub Protected Shared Sub Handler(ByVal sender As Object, ByVal args As ConsoleCancelEventArgs) If (Not HandlerEnabled) OrElse AbortFlag Then Return ' Stand down, allow complete abortion. Else Console.Out.WriteLine("Will abort on next cycle. Press Break again to quit.") AbortFlag = True args.Cancel = True End If End Sub End Class是的,这是Console类中的一个错误.存在于所有.NET Framework版本中,包括4.5.1.这是一个相当愚蠢的错误,第一次注册事件处理程序时,它将安装一个回调,以便Windows获取要引发的事件.删除事件处理程序时,如果没有剩下其他事件处理程序,则会卸载回调.但忘记重置内部“我已安装到回调”状态变量.因此,当您再次调用AddHandler时,它不会重新安装回调.
您可以在connect.microsoft.com上报告错误,如果您不想花时间让我知道,我会处理它.
它有一个愚蠢的解决方法,你只需要阻止它再次卸载回调.您可以通过注册虚拟事件处理程序来执行此操作.将这行代码放在Main()方法的顶部:
AddHandler Console.CancelKeyPress, Sub(s, e) End Sub
但当然你的解决方法也很好.请注意您的代码有其他问题,布尔变量不是同步对象. CancelKeyPress事件在另一个线程上运行,因此无法保证主线程可以看到值更改.在Release版本中运行程序并使用x86抖动时,这可能会出现故障.最低要求是将布尔变量声明为volatile,因此抖动不会将变量存储在CPU寄存器中,而是始终从内存重新加载它,但VB.NET语言没有这种语法.您应该使用真正的同步对象,ManualResetEvent是正确的.