contagem de elementos de uma consulta

Num formulário do meu banco de dados inclui um botão de comando.
Clicando sobre o botão, deve ser executada uma consulta.
Se o resultado da consulta for vazio, o usuário deve ser direcionado para o formulário "x", caso contrário, o usuário deve ser direcionado para o formulário "y".
Tente, sem sucesso, usar a função contar.
Como eu devo resolver a questão?

Boas amigo,

Para o caso você pode utilizar as funções If, elseIf Else.

If cns = "" Then
DoCmd.Openform "formulariox"
Else
DoCmd.Openform "formularioy"

End If

Continuo com dificuldade.
Observe: tenho um formulário de entrada de dados que alimenta uma tabela (o formulário foi construído com base na tabela "Tabela1"), nesse formulário, criei um botão de comando que deverá executar uma série de ações. Comecei então a desenvolver as ações usando o construtor de macros.
O primeiro passo da macro salva o registro digitado na "Tabela 1";
O Segundo passo da macro abre uma caixa de diálogo, com uma mensagem banal e um botão "OK";
O terceiro passo da macro é executada uma consulta pra verificar se existe na tabela "Tabela 2" algum registro com 2 campos cujos valores sejam iguais ao digitado em 2 campos do formulário de entrada;
Se a consulta de duplicidade constante do terceiro passo resultar vazia, deverá ser exibida uma caixa de diálogo avisando ao usuário que a inclusão foi efetuado com sucesso e o usuário deverá seguir adiante; caso contrário, o usuário deverá ser alertado para a duplicação de registro na "tabela 2" e direcionado para outra ação.
A resposta que foi encaminhada pelo ai=migo que gentilmente me atendeu, não funcionou no construtor de macros.

Silvio

Se realmente quer aprender a programar em Access, aprenda e use o código VBA.

No código VBA  da propriedade Aoclicar do botão (você pode transformar tuas macros para o  código VBA, o Access faz isso), no terceiro passo:

If Dcount("*","NomeDaconsultaDuplicidade") > 0 then  'Se a contagem for maior que  zero  então "berra"

             msgbox " Tem registro duplicado",vbCritical, "Cuidado"

             'ou coloque aqui a ação que deve seguir

End If

[ ] ' s