Select from Listbox to a Textbox

[jaw323]

I am creating a database in which I have many options in a listbox that I can select. What I would like to do is to somehow populate a textbox with the selected items from the listbox separated by a comma. This sounds like something easy enough to me, but I have been away from access for a bit and can't find code for this anywhere. Anyone have tips on where I could find code to do something similar to this?

Thanks in advance!!

 

[PHV]

Take a look at the ItemsSelected property of your MultiSelect ListBox.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[ablackwe]

This is the code I would use in VB6. Presumably the same sort of thing in Access.

For n = 0 To List1.ListIndex
If List1.Selected = True Then
Text1.Text = Text1.Text & List1.List & ", "
End If
Next n

Hope this helps
Adam

 

[PHV]

Something like this ?
strList = ""
For Each varItm In theListBox.ItemsSelected
strList = strList & "," & theListBox.ItemsData(varItm)
Next varItm
theTextBox = Mid(2, strList)

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244