Hello again!
I am doing an "Updates" form which has name, time, date and updates done fields so that updates/changes to the database are recorded on a regular basis.
I have removed the navigation bar and instead of having a separate record for each update, I wanted to append or add to a locked memo box that would show the combined information of each update (which includes name, date, time etc.)
Here is the code for the button which moves the text into the locked memo box:
Private Sub Command10_Click()
Dim rs As String
rs = Me.Person & Me.Date & Me.Time & Me.UpdateEntry
Me.PermanentIndex = Me.PermanentIndex & rs
Me.Person.Value = Null
Me.Date.Value = Null
Me.Time.Value = Null
Me.UpdateEntry.Value = Null
Me.Form.Refresh
Me.Time.Requery
Me.Date.Requery
End Sub
This works - it does move the text BUT I was wondering how I could get the output from looking like:
John Smith12:3509/09/2002Added a new text box etc.
to
Modified by:John Smith
At: 12:35 PM
on: 09/09/2002
Updates added: Added a new text box
I'm not sure how I would do that as I am not fully sure of the syntax for these commands. (I'm not extremely fluent with VBA)
Also, do you guys know what exact command I would use in the Default Value field for the date and time so that I could have that entered automatically every time I make a new update?
Thanks a lot in advance guys!
Bachfile
I am doing an "Updates" form which has name, time, date and updates done fields so that updates/changes to the database are recorded on a regular basis.
I have removed the navigation bar and instead of having a separate record for each update, I wanted to append or add to a locked memo box that would show the combined information of each update (which includes name, date, time etc.)
Here is the code for the button which moves the text into the locked memo box:
Private Sub Command10_Click()
Dim rs As String
rs = Me.Person & Me.Date & Me.Time & Me.UpdateEntry
Me.PermanentIndex = Me.PermanentIndex & rs
Me.Person.Value = Null
Me.Date.Value = Null
Me.Time.Value = Null
Me.UpdateEntry.Value = Null
Me.Form.Refresh
Me.Time.Requery
Me.Date.Requery
End Sub
This works - it does move the text BUT I was wondering how I could get the output from looking like:
John Smith12:3509/09/2002Added a new text box etc.
to
Modified by:John Smith
At: 12:35 PM
on: 09/09/2002
Updates added: Added a new text box
I'm not sure how I would do that as I am not fully sure of the syntax for these commands. (I'm not extremely fluent with VBA)
Also, do you guys know what exact command I would use in the Default Value field for the date and time so that I could have that entered automatically every time I make a new update?
Thanks a lot in advance guys!
Bachfile