[Resolvido]Quebra de Linha x Campo Memo

Boa tarde

Em meu sistema tenho um campo memo que, dependendo da condição, acrescenta a seguinte informação:

HISTÓRICO EM: 16/03/2012

Se o usuário entra neste campo memo e aciona um enter no fim da linha, quando entro pela segunda vez no campo, ele agrega a informação na linha abaixo, e fica assim:

HISTÓRICO EM: 15/03/2012
HISTÓRICO EM: 16/03/2012


Porém, se não digita nada no campo e o abre, ele vai concatenando tudo na mesma linha:
HISTÓRICO EM: 16/03/2012 HISTÓRICO EM: 16/03/2012 HISTÓRICO EM: 16/03/2012


- O código que estou usando é este:

If Not IsNull(Me.txtAtend) Then
Me.txtAtend.Value = Me.txtAtend & " HISTÓRICO EM: " & vbCrLf & Date
DoCmd.RunCommand acCmdSaveRecord
Else
Me.txtAtend.Value = " HISTÓRICO EM: " & vbCrLf & Date
DoCmd.RunCommand acCmdSaveRecord
End If

Tem alguma dica de como posso fazer para que sempre se force a quebra da linha.

Att. Vinicius




Tópico movido para a sala adequada.

Grupo Moderadores

Colega você diz:
Se o usuário entra neste campo memo e aciona um enter no fim da linha. e depois Porém, se não digita nada no campo e o abre

Se acrescentar antes do código que o campo é de preenchimento obrigatório não resolve????

Bom dia

Não resolve pois com o código que estou usando só atribui o valor e quebra a linha se o usuário acionar enter...., o código que estou a usar é este:

Private Sub Form_Current()
If Not IsNull(Me.txtAtend) Then
Me.txtAtend.Value = Me.txtAtend & vbCrLf & " HISTÓRICO EM: " & vbCrLf & Date
Else
Me.txtAtend.Value = " HISTÓRICO EM: " & vbCrLf & Date
End If
End Sub

O que preciso é que, independentemente do usuário acionar enter ou não, ao atribuir o valor o mesmo seja atribuido em uma nova linha......

Tem alguma dica?

Bom dia

Resolvi o problema com o código:

If Not IsNull(Me.txtAtend) Then
Me.txtAtend.Value = Me.txtAtend & vbCrLf & "HISTÓRICO EM: " & vbCrLf & Date & "
"
Else
Me.txtAtend.Value = "HISTÓRICO EM: " & vbCrLf & Date & "
"
End If

Obrigado

Resolvido é resolvido, tambem poderia utilizar o vbNewLine

Obrigado pelo retorno, o forum agradece.