(Resolvido) O que há de errado

[RRH]

Porque esse código não funciona?

Private Sub ab_Exit(Cancel As Integer)
If IsNull(Ab) Then
    MsgBox "É necessário preencher este campo", vbCritical, "Status"
    Ab.SetFocus
    End If
End Sub

Porque após a exibição da msg o cursor não volta para a o campo "Ab"?

Editado Dezembro 23, 2009 por Jonathan Queiroz

[RonaldoRG]

Experimente mudar o evento. Escolha outros como "ao perder o foco" ou outros relacionados, pode tá ai.

Abraço.

[MrMALJ]

Bom coloque o código na propriedade de eventos Ao receber foco do próximo objeto, assim ele devolverá o foco caso sua caomparação requerer.

[Alexandre Neves]

Em vez de Ab.SetFocus experimente DoCmd.CancelEvent

[RRH]

Fiz como o MrMALJ disse e funcionou como eu precisava. Obrigado a todos pela ajuda...