setting focus isnt working when closing a form back to another

[gangel]

Wow i may as well live on this forum now!
At least im starting to answer questions for people now with my basic knowledge

Anyway i have a form [A] with fields [ONE] and [TWO]
Then i have another form [B]

When you type something in [ONE] and press enter, it sets focus to [TWO] (so that the text is 'saved' in [ONE]) then it opens new form [B]

My issue is when i close [B] the focus still goes back to [TWO] but i want it go back to [ONE]

I have tried

!forms![A]![ONE].setfocus but it doesnt seem to work, it keeps going back to [TWO]



My code for ON LOAD of [B]

If lstSuburb.ListCount = 0 ThenMsgBox ("No Suburb Found")
Forms![ChemTrial]![SuburbID].Value = ""
DoCmd.Close
Forms![ChemTrial].SetFocus
Forms![ChemTrial]![txtSuburb].SetFocus


Exit Sub

ideas? where am i going wrong?

[June7]

Not seeing code that opens form [B].

The code you posted is behind form [B]?

Why set [SububID] to empty string? Is this an UNBOUND control for input of filter criteria?

I would do something like:

DoCmd.OpenForm "formB", , , , , acDialog
Me.txtSuburb.SetFocus

[gangel]

hey again June7,

So this is behind [B].

Chemtrial = [A] that i was using as an example .

If someone looks up suburbs with their searchbox and no suburbs appear, its because their spelling is so wrong that there are no suburbs in the listbox filter.

Therefore the [B] closes and goes back to [A] at the same place (txtsuburb] that the search started.

The reason for the SuburbID= "" is that IF there was a suburb there (thus a bound id of...1) and then they search to change the suburb, if no suburb is found it removes the ID of 1, and changes it to null, as they dont have a suburb because searching for a new one deleted the current one.

I have actually put docmd.cancelevent now which stops the cursur going to the next field

This seems to work.

I now just need it to select the text in [txtSuburb] in stead of just going to that box.!

[June7]

Try:

Me.controlname.SelLen = Len(Nz(Me.controlname, ""))