'Usage
Dim instance As Slider
'Declaration
<TemplatePartAttribute(Name := "VerticalTemplate", Type := GetType(FrameworkElement))> _
<TemplatePartAttribute(Name := "VerticalTrackLargeChangeDecreaseRepeatButton", _
Type := GetType(RepeatButton))> _
<TemplatePartAttribute(Name := "VerticalThumb", Type := GetType(Thumb))> _
<TemplatePartAttribute(Name := "VerticalTrackLargeChangeIncreaseRepeatButton", _
Type := GetType(RepeatButton))> _
<TemplatePartAttribute(Name := "HorizontalTemplate", Type := GetType(FrameworkElement))> _
<TemplatePartAttribute(Name := "HorizontalTrackLargeChangeIncreaseRepeatButton", _
Type := GetType(RepeatButton))> _
<TemplatePartAttribute(Name := "HorizontalTrackLargeChangeDecreaseRepeatButton", _
Type := GetType(RepeatButton))> _
<TemplatePartAttribute(Name := "HorizontalThumb", Type := GetType(Thumb))> _
<TemplateVisualStateAttribute(Name := "Disabled", GroupName := "CommonStates")> _
<TemplateVisualStateAttribute(Name := "Focused", GroupName := "FocusStates")> _
<TemplateVisualStateAttribute(Name := "MouseOver", GroupName := "CommonStates")> _
<TemplateVisualStateAttribute(Name := "Normal", GroupName := "CommonStates")> _
<TemplateVisualStateAttribute(Name := "Unfocused", GroupName := "FocusStates")> _
Public Class Slider _
Inherits RangeBase