[Resolvido]Problema com código no botão salvar de um formulário

Boa noite à todos, 

Vamos ao problema:

tenho um formulário de cadastro onde alguns campos são requeridos, até aí tudo bem, já coloquei os códigos nos eventos os quais notificam a necessidade de inserir os dados. A questão fica quando clico no botão salvar, se insiro somente um dado e não teclo enter ou tab para passar os campos e clico direto no botão ele salva o registro, gostaria que ao clicar no botão salvar e tivesse algum desses campos sem dados ou seja em branco, saísse a mensagem box solicitando o preenchimento e focando no campo(s). 
O código atual do botão é esse:

Private Sub sv_Click()
On Error GoTo Err_sv_Click
If DCount("Código", "tbCad_veíc", "Código=" & Me!Código) = 0 Then
MsgBox "Veículo cadastrado com sucesso", vbInformation, "Guinchos Chaves"
Else
MsgBox "Registro alterado com sucesso", vbInformation, "Guinchos Chaves"
End If
    DoCmd.RunCommand acCmdSaveRecord

    DoCmd.OpenForm "Cadastro Frota de Veículos"
Exit_sv_Click:
    
    Me.ListaB.Requery 'Refaz a consulta no campo
   Exit Sub

Err_sv_Click:
   MsgBox Err.Description
   Resume Exit_sv_Click
End Sub


se alguém puder ajudar dê uma força por favor

Sandro

Olá

vou lhe passar uma maneira simples talvez outros colegas tenha um código com menos linhas.

Coloque o seguinte código para cada campo que não quer deixar em branco após On Error GoTo Err_sv_Click.


Exemplo:

If IsNull(Me.SeuCampo) Then

MsgBox "Cadastrar Campo!", vbCritical, "Aviso do sistema")

Me.SeuCampo.setfocus

Exit Sub


End  if

Veja e tente adaptar;

http://maximoaccess.forumeiros.com/t280-valida-campos-nulos

http://maximoaccess.forumeiros.com/t102-resolvidovalidar-campos-com-preench-obrigatorio-pela-tag

Agradeço à todos pela força, adequei ao que já tinha com as dicas de vcs, ficou perfeito.

Sandro