[Resolvidos]Visualizar valor total por cliente na listbox (subformulario vinculado a consulta)

Olá amigos,


Tenho a seguinte situação:

FORM PROD/ NomeProduto/Características, etc

SUBFORM VENDAS/NomeDoCliente/DataCompra/Quantidade/ValorDaCompra...

CONS TOTAL= Campo Valor Total da Compra (de cada cliente)...


Como apresentar numa caixa texto de um formulário (produtos) o campo ValorTotalDaCompra pertencente a Consulta Total vinculando este campo(ValorTotalDaCompra) ao campo“ValorDaCompra” do Subformulário Vendas, onde toda atualização na compra de algum produto saberemos a soma total de cada cliente.

Obrigado!

Marcos Alan.

Ola marcos bom dia;

Tente assim:

Private Sub Form_Current()
Me.ValorDaCompra.Value = DLookup("ValorTotalDaCompra", "SuaConsulta", "NomeDoCliente = '" & Me.NomeDoCliente & "'")
End Sub

Olá JPaulo,

A caixa de seleção acionada pela expressão “Me.” retorna vários itens, mas apenas um campo de uma das tabelas (Produtos) que é o campo NomProd, e não ValorDaCompra” e nem “NomeDoCliente”.
Assim, tentei utilizar todas essas expressões sem êxito... ou me retorna erro... ou a caixa texto permanece em branco, e falando na “caixa texto” tenho que entrar com algum código ou rotina nas propriedades dessa caixa texto pra criar esse vínculo?


Obrigado!

Marcos Alan.

Amigão coloque o seu banco ou parte dele neste site publico para arranjar-mos o que pretende;

http://www.speedyshare.com/

Olá JPaulo,

Fiz o upload do arquivo do banco de dados “Atual ConsForm” conf. sua indicação, como é a primeira vez que realizo esse procedimento, acredito ter enviado corretamente o arquivo, do contrário passo.
http://www.speedyshare.com/files/19700795/Atualiz_ConsForm.mdb

Obrigado!

Marcos Alan.

Ola Marcos bom dia;

Você pode fazer isso com uma listbox e dar um requery à listbox sempre que premir a tecla Enter no campo Quantidade ou outro.

Assim verá sempre os totais de cada.

http://dl.dropbox.com/u/771097/Atualiz%20ConsFormII.mdb

JPaulo, bom dia.

O seu exemplo é muito bom, e vou realizar as modificações para se adequar o que eu quero realizar.

Muito obrigado.

Marcos Alan.