unselecting selected items in a listbox 1

[MBall2003]

is there anyway, to loop through a list box and if there is an item selected, unselect it??

any help would be appreciated thanks

mball

 

[GHolden]

Hi, try this...

Dim intCount As Integer

For intCount = 0 To lstList.ListCount - 1
lstList.Selected(intCount) = False
Next intCount



There are two ways to write error-free programs; only the third one works.

 

[jebry]

Hi!

Use the following code:

Dim intRow As Integer

For intRow = 0 To Me!YourListBox.ListCount - 1
Me!YourListBox.Selected(intRow) = False
Next intRow

hth


Jeff Bridgham
bridgham@purdue.edu

 

[MBall2003]

i use that code and i get this error, lstClients_AfterUpdate[2115] The macro or function set to the BeforeUpdate or ValidationRule Property for this field is preventing microsoft access from saving the date in the field



i dont know what that means

 

[GHolden]

What other event code do you have on this list control?



There are two ways to write error-free programs; only the third one works.

 

[MBall2003]

got it to work thanks