Pesquisar item na tabela

Gostaria de um cód pra pesquisar se um código de barras já se encontrar numa tabela chamada Tabela1.
Essa tabela 1 e formada dos seguintes campos,
- id (chaveorimaria)
- recibo
- código de barras 
- QNT 

Segue um exemplo 
Id    recibo.  Cód Barras.               QNT 
56      67         7898600876544.     1
55.     67.        7898654367635.     1
54.     67.        7897543785446.     2
53.     66.        7865447654466.     1

Neste caso acima note que o recibo 67 possui 3 itens ei recibo 66 apenas 1 item.

Se eu quiser fazer uma consulta apenas no recibo 67 e saber se o 7898600876544 já existe , qual método deverei usar. Pois quero colocar um If Else.

Pode usar a funcção interna DLookup, ou abrir um Recordset;

Exemplo:

Código:

DLookup("[Cód Barras]", "SuaTabela", "[Cód Barras] = '" & [SeuCampoNoForm] & "'")

No seu Form:

Código:

Private Sub SeuBotao_Click()
Dim i As Variant
        i = DLookup("[Cód Barras]", "SuaTabela", "[Cód Barras] = '" & [SeuCampoNoForm] & "'")
    If i > 0 Then
        MsgBox "Já existe...", vbCritical, "Existe"
        Else
        MsgBox "Não existe ainda...", vbCritical, "Não Existe"
    End If
End Sub

André, teve algum avanço?