create a form with a listbox (list1) a label (label1) and enter the code
Private Sub Form_Load()
List1.AddItem "test1"
List1.AddItem "test2"
List1.AddItem "test3"
List1.AddItem "test4"
List1.AddItem "test5"
' this will add 5 entries into the list box
End Sub
Private Sub List1_Click()
Label1.Caption = "the item you selected is: " & List1.List(List1.ListIndex) & Chr(10) & Chr(13) & " Its index associated with it is: " & List1.ListIndex
'on the event that the list box is clicked, it will change the caption of the label using the listindex of list1.
'CHR(10) & CHR(13) is a 'return'
End Sub
this should give you a decent understanding of the list box.
__________________
Donate Blood!
"Love is not finding the perfect person, but learning to see an imperfect person perfectly." -Sam Keen
Last edited by Dilbert1234567; 09-19-2004 at 12:58 PM..
|