FORMUL?RIO DE CONTAS A RECEBER

EDU07091996 31/05/2016 13:58:19
#462808
Boa tarde galera,

Preciso de uma ajudinha.

Estou desenvolvendo um pequeno projeto da faculdade onde é um sistema de contas a receber (diferente do cadastro de vendas que você lança produto por produto, o contas a receber você apenas lançará valor total e se quiser colocará os produtos vendidos no campo observação).

Para cadastrar a conta a receber fiz um formulário onde solicita os seguintes campo: ID (numerador automático), Matricula (Número), Cliente (Texto Curto), ValorReceber (Moeda), DataCompra (Data/Hora), Observacao (Texto Longo) e StatusPagamento (Sim/Não) e logo em seguida armazena tudo no banco de dados. Até aqui o sistema fluiu e está ok! Está recebendo e armazenando os dados!

O que me apertou foi o seguinte:

Agora necessito de um outro formulário onde eu consulto pela matricula do cliente no banco de dados da contas a receber e somo tudo o que ele deve. Exemplo:

Banco de dados:

ID Matricula Nome ValorReceber DataCompra Obsevacao e StatusPagamento

1 12345678 João Pedro R$ 12,00 20/05/2016 Coca-Cola, Salgado Não

2 87654321 Ana R$ 2,50 30/05/2016 Coca-Cola Não

3 12345678 João Pedro R$ 6,00 25/05/2016 Coca-Cola Não

4 12345678 João Pedro R$ 6,00 30/05/2016 Coca-Cola Sim

*Simulação do meu banco de dados

Agora preciso que o sistema faça o seguinte:

Recebe a matricula do João Pedro (logo é: 12345678) e calcule todos os valores que ele deve, que no caso seria: 12,00 + 6,00 = 18,00

*O produto/ContaReceber do ID [Ô]4[Ô] não somaria pois ele já tinha efetuado a compra e pago na hora.

Eu uso o Visual Basic 2010 Express e o Access como gerenciado de banco de dados

Espero que tenham entendido.

Estou no Aguardo.
PERCIFILHO 31/05/2016 14:11:21
#462811
Supondo-se que você saiba fazer consultas no banco de dados:
Você faria um SELECT com SUM para o para somar o campo ValorReceber onde (WHERE) a matrícula é igual ao aluno que você quer e (AND) o campo StatusPagamento for igual a [ô]Não[ô].
EDU07091996 31/05/2016 14:18:17
#462813
Citação:

:
Supondo-se que você saiba fazer consultas no banco de dados:
Você faria um SELECT com SUM para o para somar o campo ValorReceber onde (WHERE) a matrícula é igual ao aluno que você quer e (AND) o campo StatusPagamento for igual a [ô]Não[ô].


Ok... vou testar aqui...
EDU07091996 01/06/2016 14:34:18
#462867
Citação:

:
:
Supondo-se que você saiba fazer consultas no banco de dados:
Você faria um SELECT com SUM para o para somar o campo ValorReceber onde (WHERE) a matrícula é igual ao aluno que você quer e (AND) o campo StatusPagamento for igual a [ô]Não[ô].

Ok... vou testar aqui...


Ok... pelo jeito o programa fez tudo certo, porem agora preciso que ele receba o valor na label e quando faço ele jogar o valor lá só aparece [Ô]TRUE[Ô]
o que eu devo colocar dentro do if para aparecer o resultado?
FABRICIOWEB 01/06/2016 18:55:04
#462881
posta aparte do seu código que você fez para fazer a consulta
JABA 01/06/2016 19:24:04
#462882
Resposta escolhida
SELECT SUM(ValorReceber) As Total WHERE Matricula = [Ô] & txtMatricula.Text & [Ô] And StatusPagamento = [ô]Não[ô][Ô]


Se você fez conforme o PERCIFILHO disse, agora é só usar o apelido que você deu para o somatório na consulta e passa-lo para o recordset. Ex: LABEL1.Caption = Rs!Total, onde [Ô]Rs[Ô] seria o seu recordset.
EDU07091996 01/06/2016 20:26:43
#462885
Citação:

:
posta aparte do seu código que você fez para fazer a consulta


Segue....
KERPLUNK 01/06/2016 20:40:42
#462887
Em primeiro lugar, dê preferência para uso de queries parametrizadas. Também o uso de boas práticas com blocos [Ô]using[Ô]. Mas para responder sua dúvida, falta um espaço antes do [Ô]and[Ô] da sua query concatenada. Ficando:
comando.CommandText = [Ô]select bla bla bla Where Matricula=[Ô] & MatriculaTextbox.Text & [Ô] and ........
JABA 01/06/2016 21:27:15
#462889
Pensei que estivesse fazendo no VB6. Faça assim para o campo Saldo:

Saldo.Text = consulta.Item(0)
EDU07091996 02/06/2016 10:36:26
#462912
Ok Obrigado galera :)
Tópico encerrado , respostas não são mais permitidas