Trying to SetFocus on a Textbox but it goes to the one above it?!

[athyeh]

Hi Folks,

I have the following VBA code:

Private Sub CheckIn_AfterUpdate()
DoCmd.SetWarnings (False)
DoCmd.OpenQuery "qryRecByExcUpd"


Me.CheckIn = ""
Me.CheckIn.SetFocus
End Sub

But for some reason after the code is done running the cursor lands on the textbox ontop of CheckIn... Can someone please help me troubleshoot?

Thanks!

[ItsMe]

If it is not throwing an error and it is not setting focus on the control I will guess the code is not being executed.

What happens if you comment out
DoCmd.OpenQuery "qryRecByExcUpd"

[athyeh]

The code is being executed except for the last "Me.CheckIn.setFocus"

[ItsMe]

Try commenting out the docmd. I edited my post after I read the thread a second time.

[athyeh]

Try commenting out the docmd. I edited my post after I read the thread a second time.

Same thing :-/

[ItsMe]

Then I will go out on a limb and say the event is not firing. Can you think of a way to test if the AfterUpdate event is firing?

Also you should turn warnings back on when finished.
DoCmd.SetWarnings true

[athyeh]

Then I will go out on a limb and say the event is not firing. Can you think of a way to test if the AfterUpdate event is firing?

Also you should turn warnings back on when finished.
DoCmd.SetWarnings true

Yep, So I turned SetWarnings on, It prompts me to update the record (the query is an update query), it updates the query, it clears the textbox "CheckIn", it does everything except the last part, SetFocus on itself.

[ItsMe]

What I meant was after you set warnings to false, don't forget to turn warnings back on. But we do know the code is firing now....

So we probably need to take focus off of the query object. I would have expected a run time exception when the control was not available but try....

Forms!FormName.CheckIn.SetFocus

You will need to put the name of the form in place of FormName

[IslandHydro]

Try doing two set focus'
first set focus to the form
then set focus to the object

[athyeh]

Thank you for your replies, but neither option is working...

[Missinglinq]

The Access Gnomes can be quirky! You cannot set Focus to a Control from an event in that Control. And you cannot set Focus to a Form if there is a single Control on that Form that can receive Focus.

So set Focus to any other Control and then set it back on CheckIn.

BTW, the only event of a Control that will leave the Focus on that Control is the Control's BeforeUpdate event, if you use

Cancel = True.

Linq ;0)>

[athyeh]

The Access Gnomes can be quirky! You cannot set Focus to a Control from an event in that Control. And you cannot set Focus to a Form if there is a single Control on that Form that can receive Focus.

So set Focus to any other Control and then set it back on CheckIn.

BTW, the only event of a Control that will leave the Focus on that Control is the Control's BeforeUpdate event, if you use

Cancel = True.

Linq ;0)>

WOW!~ THANK YOU! YOU ARE INCREDIBLE! WOOSA!

Thank you all for your replies and help.

Thread Solved.

[ItsMe]

Well, the code is executing. You can not see it because the query object is open. Let's try another aproach. Why are you opening the query object if you do not want to have focus on it? Is this an action query?

If all you want to do is run an action query you can

CurrentDb.Execute "qryRecByExcUpd"
Me.CheckIn.SetFocus
Me.CheckIn = ""

[ItsMe]

I did not notice the control name was the same as the event handler. Thanks Linq

[Missinglinq]

I did not notice the control name was the same as the event handler. Thanks Linq

No problem! Between answering questions, here, you probably do something frivolous, like working for a living, while I just sit around all day, lurking in Access forums!

Linq ;0)>