TickStyle Property Example

This example allows you to see the various tick styles available in a drop-down list. To try the example, place a Slider control and a ComboBox control on a form. Paste the code into the Declarations section of the form, and run the example. Click on the ComboBox to change the TickStyle property value.

Private Sub Form_Load()
   With combo1
      .AddItem "Bottom/Right"
      .AddItem "Top/Left"
      .AddItem "Both"
      .AddItem "None"
      .ListIndex = 0 
   End With
End Sub

Private Sub combo1_Click()
   Slider1.TickStyle = combo1.ListIndex
End Sub