Combo Box Values to Go Blank on Lost Focus

[McArthurGDM]

Hi,



I have a Main form with a Subform1 which then has a Subform2.

On this Subform2, I have combo boxes that generate values based on values I chose in other combo boxes on the Subform2.

When I click away from the subform2 (that is, open up a different form while making subform2 no longer visible) and then come back to subform2, the values are still presented in those combo boxes.

How do I make it so that the combo boxes are blank upon return (re-visibility) of the subform2? Particularly, I know you have to use VBA and use the LostFocus event, but I have tried this and nothing seems to work. Perhaps someone can help me write the appropriate code for this.

Thanks,

[June7]

Those comboboxes are UNBOUND?

Me.comboboxname = Null

Put that in the same event that sets the form not visible and opens other form.

[McArthurGDM]

I put the code in the same event that sets the form to not visible and opens the other form. Thing is, that code is written for the Main form and does not recognize the control (that is, Me. (list) ) does not show the control. If I were to type the control name it does not recognize the member and I get an error.

[June7]

So you have to reference thru 2 levels of subforms? I've never had to do that. Maybe:

Me.subformcontainername.Form.subformcontainername. Form.comboboxname = Null

I always give subform containers different name from the objects they hold.

[McArthurGDM]

It worked. Thank you!

I didn't realize that you needed the code within the actual main form vs within the subform itself, but that makes sense.

[June7]

The code does not have to be behind main form but it does have to be in some event, such as the button click I presume you are using to open other form.

If you tried the subform2 LostFocus event that probably did not work because it is not open as an independent form or because there are controls that have focus. When control has focus the form does not, therefore the form cannot lose focus, the control does.

[McArthurGDM]

I see what you are saying, thanks again.