fill like previous and increment in text box

[humpz]

hi all,

i have question at form,,can access make textbox like previous record until i fill another input?so if i am not fill another input the text inbox in new record same as data in previous record?

and another question is can i make textbox as number increment automatically in new record,,example if i input number "1" at new record textbox automatic fill "2",then "3" until i input another random number.

thanks for your attention

[RuralGuy]

This link should get you part way there.

[humpz]

i try that program but it can't work,,it say error
can you help me to edit in my form?
i follow my form in attachment
in drawing number area i want it can increase number automatically until i input another number
and in the other i want this input same like previous,,can you help me to solve my problem?
thank you very much for your kindness

[RuralGuy]

In the code you added, you need to replace Control with the name of the control you want the value to carry over.

[humpz]

its still same,,what the problem?
do you mean that i must replaced command name or i must replaced with another one?
i have tried to change with command name but its still same,,say "run time error"

[RuralGuy]

This would carry over the Text34 control:

   Const cQuote = ""
   Me.Text34.DefaultValue = cQuote & Me.Text34.Value & cQuote

[humpz]

finally it work,,
thank you very much ruralguy

[humpz]

ohh,once again
can i make textbox that the value always increase 1 in new record??

i get from another source like this code

Private Sub intDrawing_AfterUpdate()
If Not IsNull(Me.intDrawing.Value) Then
intDrawing.DefaultValue = Me.intDrawing.Value + 1
End If
End Sub

but it only increase once when i make a new record,,not every time i make a new record,,so what the problem??

[RuralGuy]

Instead of the AfterUpdate event of the control, put the same code in the BeforeUpdate event of the Form.

[humpz]

sorry,, i am beginner in access,,can you tell me where the after update of the form?
or did you mean that i must input in my control again? i do but it didn't work
thanks for your teaching to me rural guy

[RuralGuy]

Open your form in design mode and press <ATL> F11 then paste this code into the code module for the form.

Private Sub Form_BeforeUpdate(Cancel As Integer)
   If Not IsNull(Me.intDrawing.Value) Then
      intDrawing.DefaultValue = Me.intDrawing.Value + 1
   End If
End Sub

[humpz]

finally its work nicely
thank you so much for your attention rural guy

[RuralGuy]

You're welcome.