Tópico anterior Próximo tópico Novo tópico
SOMAR VALORES DA COLUNA ACCESS E JOGAR NA LISTVIEW
VB / VBA
| #491797 - 11/12/2019 17:15:26 | ||||
 RICARDOPIBU CABO FRIO Cadast. em:Março/2018 
|
Anexos estao visÃveis somente para usuários registrados Olá! Preciso muito de uma ajuda,tenho uma aplicação e necessito pegar os valores que estão num campo da minha tabela, feita no access, e colocar esses valores na listview... estou enviando duas fotos para exemplificar o que estou pedindo... desde obrigado! Cursos de Excel e VB6: cursoexcelvba.com.br |
|||
| #491798 - 11/12/2019 17:17:09 | ||||
|
RICARDOPIBU CABO FRIO Cadast. em:Março/2018
|
Anexos estao visÃveis somente para usuários registrados Segunda imagemCursos de Excel e VB6: cursoexcelvba.com.br |
|||
| #491799 - 11/12/2019 17:44:35 | ||||
 KERPLUNK RIO GRANDE DO SUL Cadast. em:Junho/2009
Membro da equipe
|
SELECT Nome, SUM(ValorRecebido1) FROM TBcursos_financeiro inner join TABELA_CONTENDO_NOME_ALUNO as aluno on tbcursos_financeiro.codaluno = aluno.codigo
Group By TBcursos_financeiro.codaluno Mais ou menos isso _______________________________________________________________________ Virei Oráculo! The end is nigh, be ready for the nukes! |
|||
| #491803 - 11/12/2019 18:38:16 | ||||
|
RICARDOPIBU CABO FRIO Cadast. em:Março/2018
|
Citação: : SELECT Nome, SUM(ValorRecebido1) FROM TBcursos_financeiro inner join TABELA_CONTENDO_NOME_ALUNO as aluno on tbcursos_financeiro.codaluno = aluno.codigo Group By TBcursos_financeiro.codaluno Mais ou menos isso Desculpe, mas não estou conseguindo aplicar esse seu comando... vou lhe mostrar o comando que já fiz e deu certo, contudo ele só não me dá as somatórias de valores de cada aluno em seus respectivos lugares na listview... mas se olhar na segunda imagem q enviei, verás q ele puxa somente um valor, mas eu preciso de todos os valores q o aluno pagou durante o ano letivo. crie esse [Ô]Private sub[Ô] e chamo ele pleo Form_Load _________________________________________________________________________ Private Sub BuscaAluno() connectDB rs.Open [Ô]SELECT C.*, A.NomeParticipante FROM TBCursos_Financeiro AS C [Ô] & _ [Ô]INNER JOIN TBCursos AS A [Ô] & _ [Ô]ON C.CodAluno = A.Codigo [Ô] & _ [Ô]ORDER BY A.NomeParticipante[Ô], db, 2, 4 Do Until rs.EOF Set item = lstPagamentoAluno.ListItems.Add(, , rs!Codigo) item.SubItems(3) = rs!NomeParticipante & [Ô] - [Ô] & rs!CodAluno item.SubItems(1) = rs!Codigo item.SubItems(4) = [Ô][Ô] & [Ô]R$ [Ô] & VBA.Format(rs!ValorRecebido1, [Ô]#,##0.00[Ô]) rs.MoveNext Loop FechaDB End Sub _____________________________________________________________________________________________ Cursos de Excel e VB6: cursoexcelvba.com.br |
|||
| #491805 - 11/12/2019 19:51:10 | ||||
 OMAR2011 MONTES CLAROS Cadast. em:Setembro/2011
|
Use o Group by para código do Aluno.
|
|||
Tópico anterior Próximo tópico Novo tópico