[Resolvido]Chamando Consulta pelo VBA

Pessoal Boa Noite,

Preciso de uma ajuda, estou com o seguinte problema:

Dados para Exemplo:
===============

Tenho uma consulta já criada chamada C1;

essa consulta C1, retorna 5 campos (a, b, c, d, e);

E tem a necessitade de digitar um parametro chamado (digite codigo)

no meu form tenho os campos txa, txb, txc, txd, txe

O que preciso:
===========

Tenho a necessidade de chamar essa consulta através de VBA logo na abertura do form:

1) Como chamar essa consulta pelo VBA passando esse parm?

2) Preciso que cada campo da tela receba o conteúdo retornado dessa consulta

txa = a
txb = b
txc = c
txd = d
txe = e

Fico no aguardo de uma ajuda

Muito Obrigado

Ola;

A melhor forma de fazer isso é você abrir um Recordset à consulta e usar para preencher os campos.

Muito Obrigado, utilizei o recorde set e funcionou corretamente.

Vlw

Dim qry As QueryDef
Set qry = CurrentDb.QueryDefs("PM_TELA_VENDA")
Dim IDCodigo As Long
IDCodigo = CLng(Nz([Forms]![cadastro de vendas]![cod_ativo], 0))
qry.Parameters("codigo") = IDCodigo
Dim rs As DAO.Recordset
Set rs = qry.OpenRecordset()
Me.PM_atual.Value = rs(1)
Me.qtde_atual.Value = rs(5)

Resolvido

Obrigado pelo retorno o forum agradece.