• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 223
  • Last Modified:

Scroll Increment

How do you make a scroll bar increment +/- .1 or less.
0
pat_cunningham
Asked:
pat_cunningham
  • 2
1 Solution
 
pradapkumarCommented:
incrementation of scroll bar in decimal values is not allowed in generic control. You may design one control for that sake.
0
 
BrianGEFF719Commented:
or for example if you want your scroll bar to go from 0 to 10 with .1 steps

Set Min = 0
Set Max = (10/.1)


Then on Value you could do:

msgbox (vSlider1.value * .1 )


Do you see how this is simulating the decimal values? Just an idea
0
 
BrianGEFF719Commented:
Here is a working example, this example goes from 0 to 10 with a horinzontal scroll bar named HScroll1, it steps by .1 increments.

Private dblStep As Double
Private lngScrollMax As Long



Private Sub Form_Load()
dblStep = 0.1
lngScrollMax = 10

HScroll1.Min = 0
HScroll1.Max = (lngScrollMax / dblStep)
HScroll1.SmallChange = 1
HScroll1.LargeChange = 2


End Sub

Private Sub HScroll1_Change()
Dim dblValue As Double
dblValue = HScroll1.Value * dblStep

MsgBox "The Value is really: " & dblValue
End Sub
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now