[Resolvido]Código para impedir edição de um campo após salvar registro

Olá pessoal! Boa noite.
Estou a construir um BD no access e estou com a seguinte dificuldade. Preciso de dois códigos. Um que impede a edição de um campo X depois que o mesmo perde o foco e outro que retorna o foco para o campo Y caso o usuário não queira salvar alterações realizadas. Conto com a costumeira ajuda dos senhores. Obrigado. Oldri

Após o evento ao perder focus, trava o campo

Me.NomedoCampo.Locked=True

...................................

Dim strMsg As String
strMsg = "Foram efectuadas alterações"
strMsg = strMsg & "...Deseja gravar as alterações?"
If MsgBox(strMsg, vbQuestion + vbYesNo, "Gravar?") = vbYes Then
'do nothing
Else
Me.NomedoCampo.SetFocus

End If

Olá Viera. Obrigado pela pronta ajuda. Amanhã estarei testando a sua dica, Mas já usei o metodo Me.campo.setfocus mas não funcionou. Vou testar com a sua sintaxe e posto a resposta. Obrigado.

Veja aqui um exemplo prático

http://dl.dropbox.com/u/8157744/cep.zip

Então amigão, resolveu o problema com o exemplo enviado?

Caro Vieira, boa noite.
Peço-lhe desculpas, mas ainda não tive tempo de mexer no BD. Estou fazendo curso fora do trabalho e não tive oportunidade de acessar o BD. Mas de qualquer forma, agradeço-lhe pelo interesse. Vou ver se amanhã (29/03) vou até no serviço pegar uma copia do BD. Aí eu te falo se funfou. Abraços.

Obrigado. Aguardo o retorno.

Olá Vieira! Peço descupas pela demora, mas somente hj tive tempo de mexer no BD. Infelizmente não funcionou as sintaxes que me passou.
A primeira impede realmente de editar o campo após o mesmo perder o foco, mas o que eu preciso é que a edição não se proceda após salvar o registro e se o usuário salvar. Nesta sintaxe, não se consegue editar mesmo se não salvar o registro.
Quanto a segunda, o foco não está retornando para o último campo preenchido quando não se salva o registro como pretendido. O que acontece é erro de sintaxe (na linha do nothing).
De qualquer forma, agradeço a sua boa vontade em ajudar.
Obrigado