Private myBearbeitengeöffnet as Boolean
 
Public Property Bearbeitengeöffnet() As Boolean
        Get
            return myBearbeitengeöffnet
        End Get
 
        Set(ByVal value As Boolean)
            myBearbeitengeöffnet = value
        End Set
    End Property

Gru?

Silver