[Resolvido]Mensagem para registro não encontrado após consulta

Mensagem de registro não encontrado

Ola, tenho um formulário "A" e "B" onde o "A" é utilizado para a entrada de dados e no "B" que é idêntico ao "A" mas é utilizado para a edição dos dados, ele chama o parâmetro da consulta, porem quando o parâmetro não encontra-se registrado ele retorna o formulário sem dados.

Gostaria de saber como retornar uma mensagem ao invés do formulário vazio.

Aqui no fórum eu vi um exemplo do Matheus que foi utilizado um formulário não acoplado.
No modelo que o Matheus  disponibilizou, o resultado do registro volta como leitura, tem como ele voltar no modo edição? Se tiver como voltar no modo edição ai consigo resolver a minha questão.

Exemplo do Matheus

http://maximoaccess.forumeiros.com/t14640-resolvidomensagem-de-registro-nao-encontrado


  Obrigado.

Pode sempre colocar no procedimento de evento ao abrir do formulario;

Private Sub Form_Open(Cancel As Integer)
    If Me.RecordsetClone.RecordCount = 0 Then
    Cancel = True
    MsgBox "Sem registros...", vbCritical
    End If
End Sub