Sumar fila de un datagrid

[FoMoIrEoMX]

Si alguien me pudiera decir como sumar una fila de un datagrid, gracias

[ranefi]

Si alguien me pudiera decir como sumar una fila de un datagrid, gracias

Hola. Sabes, no entiendo tu pregunta, ¿podrías reformularla procurando ser más específico por favor?

[FoMoIrEoMX]

Mira hay te va un ejemplo

Salon           cantidad
1 A         |          20
1 B         |          25
2 A         |          30

esto aparece en un datagrid, ahora quiero saber cuantos alumnos hay en total, tengo que sumar la fila, ok, ahora como lo hago, claro se ve que la suma es 75, pero voy a utilizar muchas cantidades, asi que una calculadora manual no me sirve.

[ranefi]

Buen día. Puedes usar lo siguiente:

Código no funcional por sí solo

En el formulario

Código:

Dim Monto As Double
Dim Monto2 As Double
Dim Consulta As String

Monto = 0
Set RsTemp = Nothing
RsTemp.Fields.Append "Num Operacion", adSingle
RsTemp.Fields.Append "Monto", adDouble
RsTemp.Fields.Append "Saldo", adDouble
RsTemp.Open
Set dgDocumentosCartera.DataSource = RsTemp
dgDocumentosCartera.Columns(0).Width = 2400
dgDocumentosCartera.Columns(1).Width = 1500
dgDocumentosCartera.Columns(2).Width = 2000
Consulta = "select noperacion,monto from cartera where estado='add' or estadoprorroga='prorroga'"

Set Cartera = Cnn.Execute(Consulta)

Do Until Cartera.EOF
Monto2 = Cartera(1)
RsTemp.AddNew
RsTemp(0) = Cartera(0)
RsTemp(1) = Cartera(1)
RsTemp(2) = Monto + Monto2
Monto = Monto + Monto2
RsTemp.Update
Cartera.MoveNext
Loop

En un módulo

Código:

Public RsTemp As New ADODB.Recordset

With RsTemp
.ActiveConnection = Cnn
.LockType = adLockReadOnly
.CursorType = adOpenStatic
End With

Espero te sirva.

La fuente es:
Para ver este enlace Registrate o Inicia Sesion

ForosdelWeb.co m