Slider Control 6 in Access 2003 and Continous Froms

I would like to use the slider control in a continuous form.
As normal the slider values are the same for each record in the continous form but I would like them to be the value of another field in the record. ( each record has a different value and the slider shows it)
I wrote a litle script to go through the records and change the Slide Control to the value in each, however as the script moves down the records the next one changes the previous one and so the result is record 1 has record 2's value, record 3 has record 4's and so on.
Any suggestions?
Thanks
Danny
quickdanAsked:
Who is Participating?
 
thenelsonCommented:
I tried playing with the slider control on a continuous form and could not get it to show a different value for each record.  It's the old unbound control on continuous form problem.

You could create a crude bar graph by placing several text boxes side by side and change their backcolor via conditional formatting.
0
 
thenelsonCommented:
Post your script and in which event you entered the script.
0
 
quickdanAuthor Commented:
A button in the header - On click
Private Sub Command20_Click()
Dim t
For t = 1 To 4
Me.Slider9 = Me.CLValueEvaluation
Me.Repaint
DoCmd.GoToRecord , , acNext
Next t
End Sub
0
Ultimate Tool Kit for Technology Solution Provider

Broken down into practical pointers and step-by-step instructions, the IT Service Excellence Tool Kit delivers expert advice for technology solution providers. Get your free copy now.

 
thenelsonCommented:
Try putting it in the on current event:
Private Sub Form_OnCurrent()
Me.Slider9 = Me.CLValueEvaluation
Me.Repaint
End Sub
0
 
quickdanAuthor Commented:
I'm using this in a subform.
The "On Current Event" does the same thing
Did it work for you?
Thanks
Danny
0
 
quickdanAuthor Commented:
Do I assume the whole thing was a bad idea?
0
 
quickdanAuthor Commented:
Thanks for checking this out for me and the suggestion on the text boxes.
Danny
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.