Tratamento de erro

Boa tarde amigos..

Estou usando o seguinte código para verificar o preenchimento dos campos em meu formulário..

Private Sub Comando16_GotFocus()
Dim cancel As Boolean

If IsNull(Me.ValorBruto) Or IsNull(Me.Empresa) Or IsNull(Me.Descricao) Or IsNull(Me.valortaxa) Or IsNull(Me.Datavenda) Or IsNull(Me.Parcela) = True Then
MsgBox "Campos de valores obrigatórios não preenchidos.", vbCritical, "Atenção"

cancel = True
End If
End Sub


Quando um campo não e preenchido ele exibe a mensagem do código. Acontece que usei o cancel = True para cancelar o registro quando isso acontecer mais ele esta salvando o registro e em minha tabela com o campo em branco.. Quero que quando isso acontecesse o processo atual seja cancelado e eu possa recomeçar. Obrigado

Já tentou por aqui?