Is there a better way?

  • Thread starter Thread starter Rob
  • Start date Start date
R

Rob

I am trying to create a new record with an ID field prefilled in the new
record based on another form.
This code is sloppy in my opinion, but is the only way I know how to do it
because I can't set focus on invisible, non-enabled or locked fields.

DoCmd.GoToRecord , , acNewRec
txtSubPhaseID.Visible = True
Forms!frmProducts!txtSubPhaseID.SetFocus
txtSubPhaseID.Text = Forms!frmPhaseSearch.CboSubphase
Forms!frmProducts!cboVendorID.SetFocus
txtSubPhaseID.Visible = False


Is there a better way?

Rob
 
Hi Rob,

You should be able to just use:

DoCmd.GoToRecord , , acNewRec
txtSubPhaseID = Forms!frmPhaseSearch.CboSubphase

if you want to update the record right away you can include a Dirty = False

DoCmd.GoToRecord , , acNewRec
txtSubPhaseID = Forms!frmPhaseSearch.CboSubphase
Me.Dirty = False

HTH
Steve C
 
Have you tried NOT using the Text property? Like, leaving it out
completely (or replacing .Text with .Value)? This will default to using
Value instead, which, as far as I know, does not require the control to
have focus, and, therefore, be visible.

Pavel
 
Hi Rob

A textbox has both a Text property and a Value property. The Text property
is only valid when the control has the focus, and gives the key-by-key text
of what is currently in the control as you type, delete, etc. The Value
property (which is the default property for all editable controls) is what
is finally left in the textbox after its update is complete.

You can set the Value property from code any time, no matter whether the
control has focus, or is visible or enabled. So, all you need is:
txtSubPhaseID.Value = Forms!frmPhaseSearch.CboSubphase

Or, because Value is the default property, you can omit it entirely:
txtSubPhaseID = Forms!frmPhaseSearch.CboSubphase
 
Thanks to all,

These suggestions were all right on target and I have it working very well.

Rob
 
Back
Top