LISTVIEW DUVIDA

GESSINGER 15/02/2010 15:24:09
#334428
gostaria de saber como faço para:

somar a quantidade de linhas de um mesmo produto na coluna quantidade:
ex Agua mineral ( 3 linhas ), somar a coluna Preço
e Multitplicar 3 linhas por valor da soma da col preço
Obrigado

Uso:
Adodc
e uma listView
tem uma imagem ai ...............
TECLA 15/02/2010 18:29:24
#334441 Resposta escolhida
Seguem as dicas sem codificação.

1. Percorre todos os itens do LISTVIEW com um laço (FOR... NEXT)
3. Converta para DOUBLE o valor da coluna PREÇO antes de SOMAR
2. Armazene (e some) o valor da coluna PREÇO em uma variável
4. O resto é com você

é só por em prática!
GESSINGER 15/02/2010 20:39:25
#334445
amigo, eu não manjo nada de listview, tem como vc me mostrar como faz, para eu poder estudaar isso ?
EPISCOPAL 16/02/2010 21:14:29
#334530
PEGUDO 17/02/2010 10:57:22
#334554
Cara veja se é isso o que você precisa:

Estou supondo que seu listview já está com os dados inseridos nele.

Primeiro, crie duas variáveis, como segue:
[txt-color=#0000f0]Dim[/txt-color] valor1, valor2 [txt-color=#0000f0]As Double[/txt-color]

depois cire um laço [txt-color=#0000f0]For...Next[/txt-color] (no evento do botão, no Load do Form, ou onde você precisar), como segue:

[txt-color=#007100][ô]Supondo que o resultado apareça depois do clique do botão[/txt-color]
[txt-color=#0000f0]Private Sub [/txt-color]Command1_Click()
[txt-color=#0000f0]For[/txt-color] j = 1 [txt-color=#0000f0]To[/txt-color] ListView1.ListItems.Count
valor1 = ListView1.ListItems(j).ListSubItems(2)
valor2 = valor2 + valor1
[txt-color=#0000f0]Next[/txt-color]
Label1.Caption = valor2
[txt-color=#0000f0]End Sub[/txt-color]

Lembre-se de que isto é só um exemplo. Se for o que você precisa, faça as mudanças necessárias para sua aplicação
GESSINGER 17/02/2010 21:26:10
#334632
tentei alterei e não deu certo
preciso q os produto iguais seja somado as linhas e apareça
vou colocar o zip do programa ai, Obrigado
GESSINGER 18/02/2010 11:35:58
#334686
alguem pode me ajudar ?
LANDOSP 18/02/2010 14:09:03
#334703
Amigo segue com a alteração, da uma olhada se é isso mesmo que você precisa.
GESSINGER 04/05/2010 22:15:43
#340958
Obrigado LANDOSP é exatamente isso q eu queria, como ficaria isso se eu usasse um datgrid ao invez de listviewl ?




[ô]Alteração para Soma de itens - Landosp
For i = 1 To ListView1.ListItems.Count

If ListView1.ListItems.Item(i).ListSubItems(2) = txtProduto.Text Then
txtQuantidade.Text = ListView1.ListItems.Item(i).ListSubItems(1)
txtPreco.Text = Format(CDbl(Replace(ListView1.ListItems.Item(1).ListSubItems(3), [Ô]R$ [Ô], [Ô][Ô])) + CDbl(Replace(Preco, [Ô]R$ [Ô], [Ô][Ô])), [Ô]R$ 0.00[Ô])
ListView1.ListItems.Remove (i)
End If
i = i + 1
Next
[ô]Fim da Alteração Alteração para Soma de itens - Landosp
GESSINGER 04/05/2010 22:37:24
#340959
so precisa ter um campo mostranto a quantidade de um determinado item comprado
ex Agua mineal
Tópico encerrado , respostas não são mais permitidas
Voltar