<EditorAttribute(GetType(System.ComponentModel.Design.ArrayEditor), _
    GetType(System.Drawing.Design.UITypeEditor)), _
    DesignerSerializationVisibility(DesignerSerializationVisibility.Content), _
    TypeConverter(GetType(System.ComponentModel.ArrayConverter)), _
    Category("CUP"), Description(""), Browsable(True), Bindable(False)> _
     Public Property cupItems() As cup_co_cupItem.cupItem()
        Get
            Return iItems
        End Get
        Set(ByVal Value As cup_co_cupItem.cupItem())
            iItems = Value
        End Set
    End Property

Imports System.ComponentModel
<Serializable()> _
Public Class cupItem
 
    Public Enum enumCupItem
        Default_Item = 0
        Anrede_Personal = 1
        Anrede_Kunden = 2
        Anrede_Lieferanten = 3
    End Enum
 
    Private iItem As enumCupItem   'String
 
    Public Property Item() As enumCupItem 'String
        Get
            Return iItem
        End Get
        Set(ByVal Value As enumCupItem) 'String)
            iItem = Value
        End Set
    End Property
End Class