add multiple list to textbox

stoneman · November 3rd, 2003, 11:22 AM

I have a text field named txtEquipment on a bound form . On the form I have an unbound listbox, RowSourceType set to ValueList and contains a list of equipment.

I want to select an item from the list box, bouble click to add it to txtEquipment. I am able to do that. Now, I want to select another item in the listbox, double click the listbox and add the next equipment in a new line in txtEquipment without replacing the previous entry.

How can I do this? Thanks for any suggestion

Braxis · November 3rd, 2003, 01:10 PM

In your double-click code use something like the following:

Code:

If Nz(me.txtEquipment,"")="" then
   me.txtEquipment=me.listbox
else
   me.txtEquipment=me.txtEquipment & vbcrlf & me.listbox
End If

Brian Skelton
Braxis Computer Services Ltd.