TextBox [Date]+30

[Pro]

Hello All ..
Please Help ..

I have 2 bound TextBox ( Date & ValidityDay ) on form base on query and query base on table

I need ValidityDay TextBox get and display value from [Date] TextBox that I pick it +30Day and return this value to table and save it when I press save record button

Thanks...

 

[pbaldy]

http://allenbrowne.com/casu-14.html

 

[Pro]

Dear pbaldy
Thank you very much .... it ok

Private Sub Date_AfterUpdate()
Me.ValidityDay = Me.Date + 30
End Sub

........

 

[pbaldy]

No problem. If it isn't too late, I'd change the field name of "Date", which is a reserved word. Access can confuse it with the Date() function.

 

[Pro]

I do it my friend