Gustav Brock
gustav at cactus.dk
Thu Apr 1 08:36:29 CST 2004
Hi Tina > I begin to understand. At the OnCurrent Event for the Form, the Event > Procedure will set the DefaultValue of each TextBox to the values > determined to already be stored in the record just saved. Is that > correct? Yes and no. No saving needs to take place: At the OnCurrent Event for the Form, the Event Procedure will set the DefaultValue of each TextBox (or ComboBox etc.) to the values for the current record of those controls. > Does this require explicitly listing each TextBox of the form? Yes. /gustav >>>How does one set the DefautlValue at OnCurrent? I don't know how to do >>>that. >> >>That's not difficult - something like this: >> >> Dim txt As TextBox >> Set txt = Me!txtYourTextBox >> >> txt.DefaultValue = txt.Value >> >> Set txt = Nothing >> >>However, DefaultValue should be a string which means that if your >>textbox contains decimals or a date/time value you must be careful and >>convert to a string in US format: >> >> txt.DefaultValue = LTrim(Str(txt.Value)) >> >>or >> >> txt.DefaultValue = _ >> Format(txt.Value, "\#mm\/dd\/yyyy hh\:nn\:ss AM/PM\#") >> >>/gustav >> >>>>Tough day? No coffee? >>>> >>>>Set the DefaultValue at OnCurrent. >>>> >>>>As for Stuart's note on the KeyPreview, it's not a user feature, but a >>>>property of the form. >>>> >>>>/gustav >>>> >>>>>when a user clicks the 'Add new record' button (s)he wants the data of the current record to be displayed in the new record. >>>>>So if a user is on record 999 with field username filled with AAA and then clicks on 'Add new record' then a new record (1000) must appear with the field username filled with AAA.