Listbox with Bound Columns
 

Dear Sir,
I have placed a listbox with row source property as three columns & 10
rows range.
I am trying to run Listbox_click event to collect data in selected row.
If I run following code it goes in continuous loop. Why?
Private sub Listbox1_click()
Dim lbl1 as variant
Dim lbl2 as variant
dim lbl3 as variant
Listbox1.boundcolumn = 1
lbl1 = listbox1.list(listbox1.listindex)

Listbox1.boundcolumn = 2
lbl2 = listbox1.list(listbox1.listindex)
end sub
How can I read data from all three colums of selected row in three
different variable.
Please guide

Thanks

Vijay


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!