SOMAR QUEM GASTOU MAIS NO MES

EVERSON.PASETTO 22/10/2011 15:39:58
#387425
Seguinte tenho uma lista que tem varias vezes o nome de varios clientes
Digamos..
Primeiro quero capturar o primeiro cliente, e somar quanto ele gastou no mes

For Each Li In Me.LsvBalanco.ListItems
If Li.Checked Then
If Li.ListSubItems(1) = Nome Then
SomaValor = Li.ListSubItems(3)
TotalValor = CCur(TotalValor) + CCur(SomaValor)
End If
End If
Next

E fazer o mesmo com o segundo cliente..
E depois ver qual dos dois gastou mais..
MARCELO.TREZE 22/10/2011 15:54:42
#387426
Resposta escolhida
vc está usando banco de dados

se sim faça isso na query e preencha um grid com a listagem de que mgastou mais

seria algo mais ou menos assim

sSQL = [Ô]Select SUM(Valor) As TotalValor, cliente FROM tabela Group By Cliente Order By TotalValor DESC[Ô]
Set RS = CNN.Execute(sSQL)
Do While Not RS.EOF
List1.AddItem RS!Cliente & [Ô] = [Ô] & RS!TotalValor
RS.Movenext
Loop


com o código acima vc teria em im listbox o seguinte


Fulono de tal = R$ 5.000,00
Beltrano = R$ 3.000,00
Cicrano = R$ 2,600,0





a query acima colocaria em um grid
MARCELO.TREZE 22/10/2011 18:31:11
#387439
então o ideal seri vc carrega direto o listview usando uma query que faria isto entendeu, vc já poderia inserir os dados na listview como descrito, na query que postei acima é feito isso.
Tópico encerrado , respostas não são mais permitidas