Private t1 as test

Public Class test
    Public Enum _ab
        Zeile1
        Zeile2
        Zeile3
    End Enum
 
    Private _brief As _ab
 
    Public Property Brief() As _ab
        Get
            Return _brief
        End Get
        Set(ByVal value As _ab)
            _brief = value
        End Set
 
    End Property
End Class