Private mMeineElemente As New List(Of MeinListElement)

Public Property MeinListElement() As List(Of MeinListElement)
    Get
        Return mMeinListElement
    End Get
    Set(ByVal value As List(Of MeinListElement))
        mMeinListElement = value
    End Set
End Property

With MeineElemente
    .Add(New MeinListElement("abc", x1, y1))
    .Add(New MeinListElement("def", x2, y2))
    .Add(New MeinListElement("ghi", x3, y3))
    .Add(New MeinListElement("jkl", x4, y5))
End With

objNewMember.value1 = "abc"
objNewMember.value2 = "x1"
ObjNewMember.value3 = "y1"
objNewMember.Index = mvarMeineElemente.Count + 1