como puedo por favor sumar toda una columna
hola como están , espero que bien, bueno lo que necesito es saber como puedo hacer para sumar toda una columna de un msflexgrid y mostrar el resultado en un textbox.
espero me ayuden.
cuando sepa más los ayudaré yo.
saludos
llanes
espero me ayuden.
cuando sepa más los ayudaré yo.
saludos
llanes
Hola Amigo aqui te mando esto espero que te sea útil:
Private Sub cmdSuma_Click()
Dim Fila As Byte, contSuma As Integer
contSuma = 0
For Fila = 1 To flex.Rows - 1
contSuma = contSuma + CInt(flex.TextMatrix(Fila, 3))
Next Fila
txt = contSuma
End Sub
-----------------------------
TextMatrix(Fila, 3)) esta propiedad tiene la sintaxis (fila,columna), se asume que la columna con los valores a sumar es la 4 .
Saludos... Jhon
Private Sub cmdSuma_Click()
Dim Fila As Byte, contSuma As Integer
contSuma = 0
For Fila = 1 To flex.Rows - 1
contSuma = contSuma + CInt(flex.TextMatrix(Fila, 3))
Next Fila
txt = contSuma
End Sub
-----------------------------
TextMatrix(Fila, 3)) esta propiedad tiene la sintaxis (fila,columna), se asume que la columna con los valores a sumar es la 4 .
Saludos... Jhon
