Add item Listbox control

[Domac]

Hi,

How to add item into unbounded Listbox control from code.
I used to do this with listbox1.Add method in classic VB , what is solution
in VBA (A97) ??


Thanks!

 

[Allen Browne]

If the list box's RowSourceType is set to Table/Query, execute an append
query to add the item to the table, and then Requery the list box.

If the RowSourceType is Value List, append an item to the RowSource. For
example if the RowSource contains:
"first", "second", "third"
then this kind of thing should work (without testing):
Me.List1.RowSource = Me.List1.RowSource & ", ""fourth"""

 

[Domac]

Thanks!

If the list box's RowSourceType is set to Table/Query, execute an append
query to add the item to the table, and then Requery the list box.

If the RowSourceType is Value List, append an item to the RowSource. For
example if the RowSource contains:
"first", "second", "third"
then this kind of thing should work (without testing):
Me.List1.RowSource = Me.List1.RowSource & ", ""fourth"""