List Box Items Are De-Selected On A Screen Refresh

[plengeb]

Hello. I have an access form with a list box for selecting multiple values. When I run Visual Basic code, the screen is refreshed, and the values in the list box become de-selected. Can someone please tell me how to keep the list box values selected, or to automatically re-select the values on a screen refresh? Thank you very much. Bill

[Bob Fitz]

...the screen is refreshed...

Can you show us the code that does this.
Is the form a bound form.

[plengeb]

The form is not bound. The statements are run in a module, from a macro.

This is the code that runs from the listbox, and it runs correctly.
For Each varItm In ctl.ItemsSelected
CodeString = CodeString & "'" & varItm & "',"
DEAString = DEAString & varItm & ", "
Next varItm

This is the refresh statement in which the list box items become de-selected.
Forms!SampleMaster.Refresh