[Resolvido]Formatar campo no formulario depois de actualizar

Ola Pessoal.
Começo por dizer que ainda sou iniciante e que tenho aprendido bastante no forum, desde ja o meu obrigado.

Preciso da vossa ajuda para o seguinte.

Pretendo no campo (Documento),do fomulario, inserir Ex: VD45653654S
e que depois de actualizar o valor fique formatado assim: VD-45653654S.
Agardeço a vossa ajuda.
Orlando Pacheco.

Olá, no evento após atualizar do campo documento:
Me.Documento = Format(Me.Documento, "@@\-@@@@@@@@@")

Obrigado betogivoni.

Tentei o codigo só que esta a formatar assim.

V-D4565365-4S
Obrigado.
Abraço.
Orlando Pacheco

Como vc escreveu o código?

Ola.

o campo no  formulario chama-se ID.
escrevi assim:

no evento depois de actualizar

Me.id = Format(Me.id, "@@\-@@@@@@@@")

Obrigado.

Orlando Pacheco

Amigo, peço desculpa estava a colocar mal o codigo... erro de pincipiante

faltou mais Uma @, são 9 depois do - e vc colocou 8.

Amigo obrigado.

Desculpe pelo meu erro.

Abraço
Orlando Pacheco

Faltou vc clicar em resolvido

Ola betogivoni
tem razão, é a falta de experiência  no forum.  
Não sei se me é permitido, mas se tiver de abrir outro post eu faço.
Mas queria perguntar o seguinte:
Voce ensinou-me como formatar um campo com o mesmo numero de caracteres, mas suponhamos que
eu precise de formatar sempre o campo, seja com 5 ou mais caracteres.

Ex VD45637 formatar para VD-45637 (ja me ensinou), mas se for no mesmo campo com mais ou menos caracteres.
EX:VD456 Formatar para VD-456, ou seja o formato separar sempre as letras com um "-" ex: VD-

Estive a investigar no forum e achei  a instrucão:

If Len(Id) <>"" Then

   Select Case Len(Id)
       Case 1
       Me.id Format = "@@\-@@"
       Case 2
           Me.Id.Format = "@@\-@@@"
        Case 3
           Me.Id.Format = "@@\-@@@@"
        Case 4
           Me.Id.Format = "@@\-@@@@@"
        Case 5
           'Me.Id.Format = "@@\-@@@@@@"
           
End Select
end iF

tentei adaptar ao campo, mas não consegui. pode ajudar-me em adapta-lo?
Obrigado
Orlando Pacheco.

veja aqui nesse tópico onde ajudei um outro colega com essa mesma situação, pode baixar o exemplo que postei, não precisa mudar o formato, é só seguir o raciocínio dos Ifs.
http://maximoaccess.forumeiros.com/t16197-resolvidoaplicar-formatacao-em-dados-da-tabela

se depois de baixar o exemplo continuar tendo dificuldades em adaptar, poste o formulário e a tabela que faço isso pra vc.

Ola amigo.
Mais uma vez muito obrigado.
Fiz o que voce sugeriu e em vez de fazer copy past, tentei perceber o funcionamento do codigo.

Depois de algumas tentativas consegui fazendo o seguinte codigo:

If Len(Me.Id) = 3 Then
Id = Format(Me.Id, "@@\-@")
Else
If Len(Me.Id) = 4 Then
Id = Format(Me.Id, "@@\-@@")
Else
If Len(Me.Id) = 5 Then
Id = Format(Me.Id, "@@\-@@@")
Else
End If
End If
End If

...ate perfazer 15 caracteres e resultou na perfeição. Introduzo de 3 ate 15 Caracteres e o codigo separa
sempre as 2 letras dos restantes caracteres com um "-".

Mais uma vez obrigado.
Abraço.
Orlando Pacheco

É isso ai, as vezes o importante não é vc dar o peixe a quem precisa de comida, mas sim a vara de pesca para que ele consiga pescar seu próprio alimento. Saudações  do fórum e toda sorte no seu aprendizado.