Determine selected item: cmbo or listbox

Schrammie · Dec 13, 1999

I'm trying to create an If...then statement. 
What I would like to occur is if user selects an item from the list, a label will display a number (ex: if user selects item "Very good", then lblLabel1.Caption = 5). 
Somewhere along the way, I am not understanding how to write the code. I am assuming it has something to do with the index #. (if you can't tell, I'm brand new to programming, trying to teach myself) 
Anyone got a suggestion? 
 
Thanks in advance.

culshaja · Dec 13, 1999

The listindex property of the listbox and combobox is a long which gives you the index of the selection. It starts a 0 and goes to number of items in list -1. another way to do it is to associate a value in the itemdata property for the newly added item and then retrieve that value. 
 
to add a value to the itemdata use 
 
list.itemdata(list.newindex) = value 
 
to retrive the itemdata property use 
 
value = list.itemdata(list.listindex) 
 
 
James

DougP · Dec 15, 1999

you can also use 
x=List1.text 
it will return just the text 
or x will equal "Very good" in your case. 
 
here is a code example 
 
Private Sub Form_Load() 
List1.AddItem "Very Good" 
List1.AddItem "Normal" 
List1.AddItem "Bad" 
End Sub 
 
Private Sub List1_Click() 
If List1.Text = "Very Good" Then 
' put your code here 
End If 
End Sub 
 
DougP

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Determine selected item: cmbo or listbox

Schrammie

Programmer

culshaja

Programmer

DougP

MIS

Similar threads

Part and Inventory Search

Sponsor