Button to change Field Details in Report

[stu_c]

Hi all
Strange one for you, I have a button on my report form that when clicked brings up a dialoge box and you type in a date required to change in a certain field, once clicked ok it changes the lable text box on the report form but when I close the report and reopen it the date disappears even if I save and close if so can someone please help me I need it to stay the same until next changed

Button Name: BTNChangeDate
Lable Name: LBLDate

Code so far:

Private Sub BTNChangeDate_Click()
Dim MyDate As Date
MyDate = InputBox("Please enter a date", "Date Needed")
Me.LBLDate.Caption = MyDate
End Sub

thanks in advance

 

[Minty]

You can't do that without changing it in the design view of the form.
A label is not data it is a label. You can dynamically change it - as you are doing, but not store that change unless you store the value as data somewhere in a table that you can look up later.