¿Cómo realizo una suma en una tabla con vb6?

Hola buenas tardes, no se usar vb6 muy bien, y quisiera saber como le hago si tengo una base de datos de access enlazada a una tabla de vb con cantidades y realizar la suma al final de cada columna...(como en excel que se tiene una columna y al final se calcula la suma ya sea con una fórmula..) por fis... Ayúdenme, espero y haya sido clara en la pregunta
Respuesta
1
A ver si te sirve
RecSQL. Open "select * from tabla " ' no recuerdo bien como es la consulta
    While Not RecSQL.EOF
        reg = RecSQL.Fields("nombre_columna_a_sumar")
        suma=suma+reg
        RecSQL.MoveNext
    Wend
Set RecSQL = Nothing
asi ya tienes la suma y si el resultado lo quieres guardar solo haces
Set RecSQL = New ADODB.Recordset
                    RecSQL.Open "INSERT INTO tabla(nombre_campo) VALUES (" & Val(suma) & "
                Set RecSQL = Nothing

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas