Programación General > Visual Basic 6.0 e inferiores

 Re: SUMAR COLUMNA DE UN DATAGRID

(1/3) > >>

Jordi_BCN:
HOLA DE NUEVO, COMO PUEDO SUMAR UNA COLUMNA DE UN DATAGRID, Y MOSTRAR EL TOTAL EN UN TEXTBOX?

GRACIAS;):)

giomar:
Mira la idea es recorrer todo el datagrid por medio de un bucle en el cual debera estar un acumulador que ira sumando las cantidades del campo que desees para posteriormente mostrarlo en el textbox que deseas.
El codigo seria el siguiente:
Dim acumulador as integer
acumulador=0
For a=1 to Datagrid1.Row
      acumulador=acumulador+Datagrid1.Columns(IndiceDeColumna_a_Sumar).Value
End for
text1.text=acumulador
Ahora si el resultado es un valor numerico y deseas que se establesca un formato pues cambia la siguiente linea:
text1.text=acumulador
Por
text1.text=Format(acumulador, "standard")
Y nada mas
Suerte....
<<_GIOMAR_>>:good:

J.M.Movilla:
A ver si te gusta este código...

Saludos

Jordi_BCN:
Giomar, es justo lo que me dices tu, pero tu codigo no me funciona:(

"a" lo he declarado Integer, pero al decirle que me ponga "acumulador" en un textbox me sale 0,00

J.M. Movilla gracia por tu ayuda, pero prefiero lo de giomar, es q no puedo tocar el recordset ...

Espero q me manden el codigo correcto, gracias..;):)

Jordi_BCN:
Bueno, después de dar un esfuerzo he conseguido sumar los registros de una BD.

Pero mi cuestion es la siguiente:
Como puedo hacer q solo me sume las lineas q tienen el codigo "001"? Es decir, el total q sea la suma de todos los registros con el codigo 001 ( es q en esa tabla hay mas con 002, 003, 004... )


Espero me ayuden, me urge muchisimo:)

Navegación

[0] Índice de Mensajes

[#] Página Siguiente