How to insert a date in the first position of a memo box

[teknq]

I am having some headaches on how to insert a date into a memo box in the 1st position of the box AFTER new notes have been added. also, I don't want to delete any existng notes already entered. I have looked high and low and still can't locate a fix for my situation. The only code that works for me is populating the current date but not in the right postion. The whole purpose of this is to maintain a running log of notes which are separated by dates. Any help with this challenge would be much appreciated. Thanks a million.

Private Sub LGCMTS_GotFocus()
[LGCMTS].SelStart = 0
End Sub

Private Sub LGCMTS_AfterUpdate()


[LGCMTS] = [LGCMTS] & Now() & "> "
End Sub

[pbaldy]

So reverse the order:

[LGCMTS] = Now() & "> " & [LGCMTS]

[teknq]

Thank you so much Paul would have never thought of that and so simple. You guys are awesome!! Also, how would I change the long date to a short date format?

[Missinglinq]

If you just want the 'date' portion, use Date() instead of Now(). You really should only use Now() when the time portion is actually needed.

Linq ;0)>

[TG_W]

Format(Date(),"Short Date")

[pbaldy]

Happy to help, and welcome to the site by the way!