Enum EnumBackStyle
    Transparent
    Undurchsichtig
End Enum
 
Public Property Get BackStyle() As EnumBackStyle
    BackStyle = UserControl.BackStyle
End Property
 
Public Property Let BackStyle(ByVal NeuerWert As EnumBackStyle)
    UserControl.BackStyle = NeuerWert
    'Label1.BackStyle = UserControl.BackStyle
    'Wenn ich die BackStyle Eigenschaft des Labels gleich der Eigenschaft des 
    ' Controls
    'setzte, verschwindet er
End Property