Listbox.clear

[sassy2009]

Hello All,

i have a listbox control named lstDisplay. I have added items to the list using the additem method. But when i tried clearing the listbox using Clear method i cannot find it. i searched for the listbox control's methods and properties using the object browser but cant find Clear in it. Please help.....Access 2003

Thanks
Sassy2009

[MikeTheBike]

Hi

Assumning the list Row Source Type is 'Value List' then perhapse

lstDisplay.RowSource = ""

??

MTB

[NeoPa]

MTB is on the button with this one.

The opposite of .AddItem though, is .RemoveItem. This enables you to clear a single item from the ListBox.

[ADezii]

Just as a sidenote, because of the dynamic Re-Indexing of List Box contents after a RemoveItem has been applied, the following code will always remove all entries in a List Box named [lstTest]:

Dim intItemsInList As Integer
Dim intCounter As Integer
 
intItemsInList = Me![lstTest].ListCount
 
For intCounter = 0 To intItemsInList - 1
  Me![lstTest].RemoveItem 0
Next

[NeoPa]

When dealing with a diminishing set (This also applies to rows in Excel where you may delete some within the loop) I always start from the end and work backwards. It makes for easier and more obvious code (not that there is anything wrong with ADezii's code you understand) :

Dim intX As Integer
 
With Me.lstTest
  For intX = .ListCount - 1 To 0 Step -1
    Call .RemoveItem(intX)
  Next intX
End With

[blah DeBlah]

'''ogawd.
 
While Not Me.theListBox.ListCount = 0
 
    Me.theListBox.RemoveItem (0)
 
Wend
 
'''...seems to work each and every time.
 

[NeoPa]

Certainly appropriate code for this question. If the clearing is not dependent on any criteria then repeatedly clearing the first item in the list until it's empty makes sense.

I think we're all overlooking the easy answer to the question though, which was supplied by MTB in post #2 ;-)

[blah DeBlah]

Yes, that's definitely a work of art.