Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Beginner
Aug 22, 1997



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Make Two (or More) List Boxes Follow Each Other

Suppose you have two list boxes side by side-one to display the name of a person, the other to display his or her e-mail address. If the boxes contain several entries, you want both boxes to scroll at the same time. For example, when the user uses the scrollbar of the Names list box, the lines of the e-mail list box remain at the level of the corresponding Names list-box lines. Unfortunately, the Click event of list boxes doesn't let you monitor the use of its scrollbar. The solution is to use a Timer in conjunction with the TopIndex property of your list boxes to compare and adjust the level of both boxes frequently. Set the Interval property of the Timer to 50, and type this simple line of code in the Timer event:
Private Sub Timer1_Timer()
	If List1.TopIndex <> List2.TopIndex Then _
		List2.TopIndex = List1.TopIndex
End Sub
Disable List2 so that the user is forced to use only the scrollbar of List1, but still sees the information displayed in List2.
Eric Bernatchez
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date