[Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

Meu problema é o seguinte.
Eu quero digitar o código(busca) e quando eu clicar em buscar eu quero que apareça o resultado da consulta nos campos abaixo.
depois eu quero poder alterar/excluir estes dados pelos botões abaixo.
Se possivel, caso não encontre nenhum produto, mostre uma mensagem de nenhum produto encontrado.

Já tentei varias coisas... select, dlookup, e mais algumas de varios jeitos diferentes e nada reolveu...
se alguem puder me ajudar

Desde já agradeço a ajuda

Bom dia.

Por gentileza, poste aqui, a parte desse projeto em que você está com problemas para podermos analisarmos com mais calma.

Grato.

Esse form está vinculado a alguma tabela ou consulta ?

Pode sempre utilizar:

Private Sub SeuCampoCódigoBusca_AfterUpdate()
 
    If SeuCampoCódigoBusca.Value > 0 Then
        Me.Filter = "[SeuCampoCódigo]=" & SeuCampoCódigoBusca.Value
        Me.FilterOn = True
        Me.Requery
    End If
    
End Sub

Tentei vincula-lo a uma busca, mas não deu certo.
Tentei vincula-lo a uma tabela e também não funcionou.
Estou tentando fazer alteração e exclusão de produtos, eu queria que buscasse o produto pelo código digitado no campo "Código do Produto(busca)" e quando eu clicar em "buscar" ele mostra os dados do produto nos outros campos do formulário, para que eu possa altera-los e clicar no botão "Alterar para aplicar a alteração", ou clicar em "Excluir" para apagar o registro.

Eu tentei esse código que JPaulo passou mas ele só fica pedindo o código do produto e não exibe nenhum dado.

Estou deixando o link para download no 4Shared do meu Banco de Dados.
http://www.4shared.com/file/WNkTg1w7/Enderecamento_2.html?

Pelo 4shared não consigo fazer o Download

Compacte com o winzip e anexe aqui em .zip

Esta ai em .rar

Veja o simples;

Private Sub btAcharProd_Click()
 If Me.Texto45.Value > 0 Then
        Me.Filter = "[cod_produto]=" & Texto45.Value
        Me.FilterOn = True
        Me.Requery
    End If
End Sub

http://dl.dropbox.com/u/771097/Enderecamento_OLD.rar

Mto obrigado JPaulo, agora eu entendi.

Mas eu não consigo escrever para editar...
como faço agora?

Veja nas propriedades do form, guia Dados, coloque permitir editar e deletar = sim

muitissimo obrigado JPaulo.

Vai ajuda muito aqui.