Public Class clsNotifyIcon
   'Inherits System.ComponentModel.Component
   Inherits NotifyIcon
 
   Public Class _ContextMenü
  Inherits ContextMenu
           Public Property AddIrgendetwas() As String
         Get
 
         End Get
         Set(ByVal Value As String)
 
         End Set
      End Property
   End Class
 
End Class

 Dim ntyIcon  As clsNotifyIcon
ntyIcon._ContextMenü.AddIrgendetwas

Inherits ContextMenu