'Declaration Protected Read Property Position As Integer
Dim position As Integer = verticalSlider.Position