.net – 删除Console.CancelKeyPress处理程序一次禁用任何将来的

起初,这看起来像一个简单的任务.我创建了一个带有明显的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