Ba tarde amigos
Tenho uma caixa de texto que ao receber o foco tem a seguinte função:
Private Sub txtMensagem_GotFocus()
On Error Resume Next
If IsNull(Me.txtMensagem) Or Me.txtMensagem = "" Then
Me.txtMensagem = "Cumprimentos" & vbCrLf & Me.Nome
Me.txtMensagem.BackColor = 8454143
Else
End If
End Sub
Quando entro na caixa tem já digitado
Cumprimentos
Anibal Assis
Mas a palavra Cumprimentos está logo no inicio da caixa e eu queria que ela estivesse na segunda linha.
Já tentei assim mas nao resultou
Me.txtMensagem = " & vbCrLf &" "Cumprimentos" & vbCrLf & Me.Nome
Tenho uma caixa de texto que ao receber o foco tem a seguinte função:
Private Sub txtMensagem_GotFocus()
On Error Resume Next
If IsNull(Me.txtMensagem) Or Me.txtMensagem = "" Then
Me.txtMensagem = "Cumprimentos" & vbCrLf & Me.Nome
Me.txtMensagem.BackColor = 8454143
Else
End If
End Sub
Quando entro na caixa tem já digitado
Cumprimentos
Anibal Assis
Mas a palavra Cumprimentos está logo no inicio da caixa e eu queria que ela estivesse na segunda linha.
Já tentei assim mas nao resultou
Me.txtMensagem = " & vbCrLf &" "Cumprimentos" & vbCrLf & Me.Nome