Testei com as dicas. Realmente os erros pararam, mas o problema de ficar marcando as checkbox continua. Vou tentar explicar melhor:

 

Neste form tenho 2 campos que são checkbox e quando clico no botão que move para o registro anterior ou posterior se for o primeiro ou o último registro o programa não exibe a mensagem de imediato, primeiro ele marca todas as checkbox independente se o campo no banco de dados for marcado ou não e somente no segundo clique no botão que ele exibe a mensagem. Alguém já passou por isso ou conhece como solucionar?

 

Obrigado! Abraços, William.

Obrigado pessoal pelas dicas! Corrigi o problema. Nada como um programa antigo nosso pra servir de auxílio!!! Ficou assim, caso alguém precise:

 

On Error Resume Next

rst.MovePrevious

mDados

If rst.BOF Then
    rst.MoveNext

    mDados
    MsgBox "Início do arquivo.", vbOKOnly + vbInformation
    Exit Sub
End If

Olá Willian, O erro: "94 - Invalid use of Null" significa que teu BD tem algum campo com o valor nulo que está obrigatoriamente sendo passado para o seu form através da sub q vc criou "mDados", para evitar tal erro vc precisa tratar o nulo de campos que possam conter NULO. Ex:

Private Sub mDados()

 

    If not IsNull(rst("NOME_CLI")) then text1.text = rst("NOME_CLI")

    If not IsNull(rst("ENDERECO")) then text2.text = rst("ENDERECO")

 

 

E assim por diante.

 

Quanto ao outro erro, o 3021, verifique o uso da condição SE, pois em alguns casos, a condição ELSE pode ser ambígua e produzir 2 valores, gerando o referido erro.

 

William! este "94 - Invalid use of Null" ou "3021 é quando existe alguma variavel ou campo com valores nulll ou invalidos. Ex dt ivalida, campo vazio ou relacionamento de tabelas invalidos.... etc...

t+ Bira 

Creio que é isso mesmo, por exemplo, se vc estiver no primeiro registro, logo BOF vai ser igual a False, então vc vai dar um .moveprevious, ai sim vai ser BOF = true, dai vc tenta pegar os campos, que não terão um ponteiro pro registro.

 

T+