[Resolvido]Como adicionar dados pressionando a Tecla ENTER "Select Case..."

Bom dia, mais uma dúvida surgindo já procurei em documentos da microsoft não consegui achar,

por exemplo:

eu tenho Select Case da Tecla ENTER, eu tenho um campo que já tem dados inseridos, se eu for usar "Me.CorpoEmail.Value" ele vai substituir tudo que tem dentro do campo, a minha intenção é fazer com que quando eu pressionar a tecla enter ele pular de linha escrevendo

forma de HTML
pra justamente facilitar ao usuário final....
porém ainda não consegui nada =/

Private Sub CorpoEmail_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyReturn
KeyCode = 0
End Select
End Sub

Se eu entendi direito, fiz um exemplo pra você.

você só tem que ir na propriedade do formulário e na guia OUTRO, lá em baixo ativar "visualizar teclas" coloca sim. esse exemplo já está ativado blz.

vê se te ajuda ai.

Bom dia Carvalho, como se trata de um campo Longo, seria no mesmo campo,

pressionar ENTER e pular linha, aí vem o X da questão pra que eu quero fazer isso, se o access já faz isso

pra quando pressionar enter ele acrescentar

no texto sem apagar o que já estou escrevendo...

Tipo isso:

Prezado cliente Fulano de Tal, (ENTER)



Venho por meio deste....


entendeu ? quando pressionar enter ele quebra a linha acrescenta o

e depois quebra de novo..

Se eu entendi direito vai ser mais simples.

vá na propriedade do campo e na guia "Outra" Comportamento da tecla Enter" deixe como "Nova linha do campo".


segue o exemplo.

também não é isso,

tipo tem que ser

Ao pressionar tecla, quebrar linha e adicionar



sem o usuáiro ter que escrever

entendeu ?

Desculpa ai, mais não entendi..

como se trata de HTML, eu preciso que quando pressione enter ele adicione pra mim
+ quebrar linha que iria ficar assim

primeiro texto ao PRESSIONAR ENTER

<- adicionar ao pressionar enter
colocar o cursor aqui nessa linha <- pular para essa linha

Private Sub corpoemail_KeyDown(KeyCode As Integer, Shift As Integer)
' quebrar linha estilo HTML para email
Select Case KeyCode
Case vbKeyReturn
Me.corpoemail.SelText = " " & vbCrLf & "
"
Me.corpoemail.SelStart = 255
KeyCode = 0
End Select
End Sub


ao pressionar ENTER, você pula uma linha e põe
que no caso HTML seria quebrar linha. perfeito pra fazer um texto no corpo do email pelo formulário.