Mega Code Archive

 

Categories / VB.Net / WPF

 

Set the slider value with RepeatButton

<Window x:Class="WpfApplication1.Window1"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="WPF" Height="100" Width="200">     <StackPanel>         <Slider Name="slider" Maximum="100" Minimum="0" Value="50" />         <StackPanel Orientation="Horizontal">             <RepeatButton Click="SliderLeft_Click" Content="Click Me"                            Height="23" Margin="10" Width="70"                            ToolTip="Click to move slider left" />             <RepeatButton Click="SliderRight_Click" ClickMode="Hover"                            Content="Touch Me" Height="23" Margin="10"                            ToolTip="Hover to move slider right" Width="70" />         </StackPanel>     </StackPanel> </Window> //File:Window.xaml.vb Imports System.Windows Namespace WpfApplication1   Public Partial Class Window1     Inherits Window     Public Sub New()       InitializeComponent()     End Sub     Private Sub SliderLeft_Click(sender As Object, e As RoutedEventArgs)       slider.Value -= 1     End Sub     Private Sub SliderRight_Click(sender As Object, e As RoutedEventArgs)       slider.Value += 1     End Sub   End Class End Namespace