Public Class Fenster1
    Private m_Bezeichung(10) As String
    Private m_Aktiv(10) As Boolean
    Private m_bescheint(10) As Boolean
    Private m_Punkt(10) As ArrayList
    Private m_point(10) As ArrayList
    Private m_Bild(10) As String
 
 
 
    Public Property Bezeichung(ByVal index As Single) As String
        Get
            Return m_Bezeichung(index)
        End Get
        Set(ByVal Value As String)
            m_Bezeichung(index) = Value
        End Set
    End Property
 
    Public Property Aktiv(ByVal index As Single) As Boolean
        Get
            Return m_Aktiv(index)
        End Get
        Set(ByVal Value As Boolean)
            m_Aktiv(index) = Value
        End Set
    End Property
    Public Property Bescheint(ByVal index As Single) As Boolean
        Get
            Return m_bescheint(index)
        End Get
        Set(ByVal Value As Boolean)
            m_bescheint(index) = Value
        End Set
    End Property
    Public Property Punkt(ByVal index As Single) As ArrayList
        Get
            Return m_Punkt(index)
        End Get
        Set(ByVal Value As ArrayList)
            m_Punkt(index) = Value
        End Set
    End Property
    Public Property Point(ByVal index As Single) As ArrayList
        Get
            Return m_point(index)
        End Get
        Set(ByVal Value As ArrayList)
            m_point(index) = Value
        End Set
    End Property
    Public Property Bild(ByVal index As Single) As String
        Get
            Return m_Bild(index)
        End Get
        Set(ByVal Value As String)
            m_Bild(index) = Value
        End Set
    End Property
End Class