Programación General > Visual Basic 6.0 e inferiores
Listview
spiderman1602:
BUENO SOLO PIDO AYUDA PARA SABER COMO PUEDO LEER UNA COLUMNA EN EL LISTVIEW YA QUE LO QUE PRETENDO EN MI SISTEMA ES SUMAR TODO LO CONTENIDO EN ESA COLUMNA, BUENO MI SISTEMA CUENTA CON CUATRO COLUMNAS Y LA ULTIMA ES LA DEL PRECIO, ESA COLUMNA DE PRECIO ES LA QUE QUIERO SACAR PARA LA SUMA TOTAL DE LA VENTA DE ANTEMANO MUCHAS GRACIAS!!! :-)
RadicalEd:
Favor no
Gracias
Si estas tomando los datos de una DB, puedes usar la función SUM de SQL así:
<!--sql--></div><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>SQL </td></tr><tr><td id='CODE'><!--sql1-->[color=blue;font-weight]SELECT[/color] SUM(campo) FROM tabla <!--sql2--></td></tr></table><div class='postcolor'><!--sql3-->
spiderman1602:
BUENO DE ANTEMANO GRACIAS POR TOMARTE LA MOLESTIA DE RESPONDER, PERO BUENO LO QUE PASO ES QUE LOS NUMEROS LOS TENGO QUE AGARRAR DEL LISTVIEW DIRECTO NO DE UNA BASE DE DATOS AL MOMENTO QUE TERMINE DE HACER LA VENTA LO QUE QUIERO ES QUE SE SUMEN TODO LO QUE CONTENGA ESA COLUMANA :)
spiderman1602:
BUENO DE ANTEMANO GRACIAS POR TOMARTE LA MOLESTIA DE RESPONDER, PERO BUENO LO QUE PASO ES QUE LOS NUMEROS LOS TENGO QUE AGARRAR DEL LISTVIEW DIRECTO NO DE UNA BASE DE DATOS AL MOMENTO QUE TERMINE DE HACER LA VENTA LO QUE QUIERO ES QUE SE SUMEN TODO LO QUE CONTENGA ESA COLUMANA :)
F_Tanori:
Hola tal vez un poco tarde pero aun puede ayudar a alguien!
--- Código: Text --- Private Sub cmdSumar_Click() Dim lv_element As ListSubItems Dim ld_suma As Double Dim li_Ultima li_Ultima = 3 'Columna del importe For Each lv_element In Me.ListView1.ListItems ld_suma = CDbl(ld_suma + lv_element(li_Ultima).Text) Next Me.TxtSuma = Format(ld_suma, "Currency")End Sub
Saludos
Navegación
[#] Página Siguiente
Ir a la versión completa