[Resolvido]Buscar resultado em controles.

Galera boa tarde.
Tenho um form com um subform de Orçamentos, neste subform, tenho um campo verdadeiro/falso que quando o produto não existe o usuário cadastra diretamente em outro form e automaticamente o sistema marca esta opção como true.

Até aqui td bem.

Gostaria de saber como posso contar estes registros true para que se for igual á zero, ou seja, se não existir nenhum registro novo, o sistema libere o botão Gerar R.E.?

Obrigado a todos.
Abraços.

Pode contar numa consulta ou por VBA no Formulário

Código:


Dim IntStatus As Variante
IntStatus = 0
IntStatus = DCount("[CampoOpção]", "TuaTabela", "[CampoOpção] = -1")
    If IntStatus = 0 Then
    MsgBox "Não tem registos com True."
    Else
    MsgBox "Tem" & vbCrLf & IntStatus & vbCrLf & "registos marcados com True."
    End If


Seria quase isso, só que assim está em vba, e eu tenho uma consulta, deste jeito ele está pegando de uma tabela.
Não entendi direito.

Obrigado pela dica.