I have a form with a comments textbox that links to a memo filed in a table. I have an unbound textbox for the users input, and afterupdate, I concatenate the input to what was in the comments textbox.
It is working the way I want it to, except it carriage returns even on the first entry. I don't want a blank line to start off with, but I can't get rid of it.
The code I'm using:
Private Sub inputtxt_AfterUpdate()
Dim priorcomments As Variant
If Not IsNull([Receiver Comments]) Then
priorcomments = [Receiver Comments]
[Receiver Comments] = priorcomments & vbCrLf & Time() & " - H710 - " & inputTxt
Else
[Receiver Comments] = Time() & " - H710 - " & inputTxt
End If
inputTxt = Null
priorcomments = Null
End Sub
Screen shot included
Any help you can provide will be very much appreciated.
Thanks in advance,
Mike
It is working the way I want it to, except it carriage returns even on the first entry. I don't want a blank line to start off with, but I can't get rid of it.
The code I'm using:
Private Sub inputtxt_AfterUpdate()
Dim priorcomments As Variant
If Not IsNull([Receiver Comments]) Then
priorcomments = [Receiver Comments]
[Receiver Comments] = priorcomments & vbCrLf & Time() & " - H710 - " & inputTxt
Else
[Receiver Comments] = Time() & " - H710 - " & inputTxt
End If
inputTxt = Null
priorcomments = Null
End Sub
Screen shot included
Any help you can provide will be very much appreciated.
Thanks in advance,
Mike