Private m_MessagesAbfangen As New List(Of WndMsg)
 
        Public Property prop_MessagesAbfangen() As List(Of WndMsg)
            Get
                Return m_MessagesAbfangen
            End Get
            Set(ByVal value As List(Of WndMsg))
                m_MessagesAbfangen = value
            End Set
        End Property
 
  <Serializable()> _
        Public Enum WndMsg
            WM_ACTIVATE = &H6
            WM_ACTIVATEAPP = &H1C
            WM_AFXFIRST = &H360
            WM_AFXLAST = &H37F
            WM_APP = &H8000
            WM_ASKCBFORMATNAME = &H30C
            WM_CANCELJOURNAL = &H4B
            WM_CANCELMODE = &H1F
...