Posted on January 4, 2009
1
2
3
4
5
6
7
| 'Controls - How to select or highlight the next item on the list box on button click
Private Sub Command1_Click()
List1.ListIndex = (List1.ListIndex + 1) Mod List1.ListCount
End Sub
'Mod List1.ListCount makes sure that you don't try to use too big Index,
'instead it jumps to the first item. |