After OK, to jump to text box

[an]

Hi!

In main form I have a combobox to choose an option.
After choose, open a 2nd form with a message to alert for the obligatoriness
of fulfilling of NAI field (in unbound text box).

That 2nd alert form has o command button to OK.

I would like:
After click in that button (OK of the alert 2nd form), the cursor jumped for
the NAI field in main form. ( In this case is unbound textbox witn control
txtNAI )

In procedures of the OK button I have a code

Private Sub cmdOK_Click()

Dim txtNAI As Control

Set txtNAI = Forms!F_EntrData!txtNAI
DoCmd.GoToControl txtNAI

intMsgBox = vbOK
DoCmd.Close
End Sub

Don't work.
I would like your help, please.

Thanks in advance.
an

 

[Arvin Meyer [MVP]]

Try using a simple msgbox instead of the alert form (aircode):

Private Sub cboMyCombo_AfterUpdate
MsgBox "The next field is required", vbOKOnly, "Required Data"
Me.txtNAI.SetFocus
End Sub

--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads
http://www.datastrat.com
http://www.mvps.org/access

 

[an]

Ok, AM

Your solution work fine.
Thank you very much!

Have a good week.
an