Verificar se já existe Cadastro

[BRUCCE]

boa Tarde galera!!

Tõ precisando de uma foricinha aki..

Estou criando um BD para Gerenciar um Arquivo de Processo...

Estou usando os seguintes campos:

Data de Arquivo; Item; Caixa; Processo; Nome; CPF; Categoria

Criei um campo que faz uma busca na tabela para verificar se existe algum processo....

Criei uma Caixa de Texto Não Acoplada (BCPF), e no avento Apos Atualizar, coloquei.

Private Sub BCPF_AfterUpdate()

'seta variavel recordset

Set Cadastro = Me.RecordsetClone

With Cadastro

'verifica se o cliente já está cadastrado

.FindFirst "CPF='" & Me.BCPF & "'"

'se encontrou então

If Not .Nomatch Then

'Desfaz o registro

Me.Undo

Me.Bookmark = .Bookmark

Set Cadastro = Nothing

End If

End With

End Sub

Ate ai normal, só que quando não existir o CPF Cadastrado, quero que seja exibida uma mensagem "CPF Não Cadastrado"

Vou usar esse código, tanto para buscar por CPF, quanto por processo e nome.

Temais@