icarus/Icarus/ShowValueSlider/ShowValueSlider.xaml.vb

Public Class ShowValueSlider

   Public Shared ReadOnly ShowValueProperty As DependencyProperty = DependencyProperty.Register("ShowValue", GetType(String), GetType(ShowValueSlider), New FrameworkPropertyMetadata(""))

   Public Shadows Property ShowValue As String
      Get
         Return CStr(MyBase.GetValue(ShowValueProperty))
      End Get
      Set(value As String)
         MyBase.SetValue(ShowValueProperty, value)
      End Set
   End Property

   Public Shared ReadOnly ShowMaximumProperty As DependencyProperty = DependencyProperty.Register("ShowMaximum", GetType(String), GetType(ShowValueSlider), New FrameworkPropertyMetadata(""))

   Public Shadows Property ShowMaximum As String
      Get
         Return CStr(MyBase.GetValue(ShowMaximumProperty))
      End Get
      Set(value As String)
         MyBase.SetValue(ShowMaximumProperty, value)
      End Set
   End Property

   Public Shared ReadOnly ValueIndexProperty As DependencyProperty = DependencyProperty.Register("ValueIndex", GetType(String), GetType(ShowValueSlider), New FrameworkPropertyMetadata(""))

   Public Shadows Property ValueIndex As String
      Get
         Return CStr(MyBase.GetValue(ValueIndexProperty))
      End Get
      Set(value As String)
         MyBase.SetValue(ValueIndexProperty, value)
      End Set
   End Property

   Public Shared ReadOnly ValueHeightProperty As DependencyProperty = DependencyProperty.Register("ValueHeight", GetType(String), GetType(ShowValueSlider), New FrameworkPropertyMetadata(""))

   Public Shadows Property ValueHeight As String
      Get
         Return CStr(MyBase.GetValue(ValueHeightProperty))
      End Get
      Set(value As String)
         MyBase.SetValue(ValueHeightProperty, value)
      End Set
   End Property

End Class