Public Shared ReadOnly RSP_ElementtypProperty As DependencyProperty =
                DependencyProperty.Register("RSP_Element", GetType(cls_RSP_Element.Typen), GetType(Startparameter))


    Public Shared Function GetRSP_Elementtyp(ByVal RSP_Element As UIElement) As cls_NADIS_RSP_Element.Typen
        Return DirectCast(RSP_Element.GetValue(RSP_ElementtypProperty), cls_NADIS_RSP_Element.Typen)
    End Function

    Public Shared Sub SetRSP_Elementtyp(ByVal RSP_Element As UIElement, ByVal value As cls_RSP_Element.Typen)
        RSP_Element.SetValue(RSP_ElementtypProperty, value)
    End Sub

<RSP_Element_View Grid.Row="0" Tools:Startparameter.RSP_Elementtyp="Kiste" />