.NET RadioButton 觸發雙擊事件

Public Class DoubleClickRadioButton 
    Inherits System.Windows.Forms.RadioButton 

    Public Sub New() 
        Me.SetStyle(ControlStyles.StandardClick Or ControlStyles.StandardDoubleClick, True) 
    End Sub 
    'NEW EVENTS THAT WILL NOW BE EXPOSED 
    Public Shadows Event MouseDoubleClick As MouseEventHandler 

    'DELEGATES TO HANDLE PROCESSING OF THE EVENTS 
    Public Delegate Sub MouseEventHandler(ByVal sender As Object, ByVal e As MouseEventArgs) 

    Protected Overrides Sub onMouseDoubleClick(ByVal e As MouseEventArgs) 
        RaiseEvent MouseDoubleClick(Me, e) 
    End Sub 
End Class