This example toggles the orientation of a Slider control on a form. To try the example, place a Slider control onto a form and paste the code into the form's Declarations section, and then run the example. Click the form to toggle the Slider control's orientation.
Private Sub Form_Click()
If Slider1.Orientation = 0 Then
Slider1.Orientation = 1
Else
Slider1.Orientation = 0
End If
End Sub