Private pMyValue As T
   Public Property MyValue() As T
      Get
         Return pMyValue
      End Get
      Set(ByVal value As T)
         If pMyValue IsNot value Then
            pMyValue = value
 
            ' Event auslösen
         End If
      End Set
   End Property