Zygor63119
Programmer
I have a recordset. I use it to edit a memo field. Each day I loop through it and add a new amount. I need a new line each day.
I have tried rst.fields("DailyAmount")= someamount & vbcrlf and rst.fields("DailyAmount"). I also tried every combination of -
vbcr
vblf
vbnewline
Chr(10)
Chr(13)
vbcrlf
I am entering the amount in a text box. Then, on close, the event edits the field via a recordset(vba). here is a snipit of the code I'm using. strmoved = the current value of the field.
If Nz(Trim(.Fields("NewAmt")), "Null") = "Null" Then
.Fields("NewAmt") = Trim(strMoved)
Else
.Fields("NewAmt") = Trim(strMoved) & vbCrLf & Trim(.Fields("NewAmt"))
End If
When done I hoped to see something like
$12,151
$9,235
$17,662
instead I get - $12,151 $9,235 $17,662
I have tried changing the enterkey behavior and switched between plaintext and richtext.
If someone could shed some light on this I'd appreciate it.
I have tried rst.fields("DailyAmount")= someamount & vbcrlf and rst.fields("DailyAmount"). I also tried every combination of -
vbcr
vblf
vbnewline
Chr(10)
Chr(13)
vbcrlf
I am entering the amount in a text box. Then, on close, the event edits the field via a recordset(vba). here is a snipit of the code I'm using. strmoved = the current value of the field.
If Nz(Trim(.Fields("NewAmt")), "Null") = "Null" Then
.Fields("NewAmt") = Trim(strMoved)
Else
.Fields("NewAmt") = Trim(strMoved) & vbCrLf & Trim(.Fields("NewAmt"))
End If
When done I hoped to see something like
$12,151
$9,235
$17,662
instead I get - $12,151 $9,235 $17,662
I have tried changing the enterkey behavior and switched between plaintext and richtext.
If someone could shed some light on this I'd appreciate it.