Visual Basic - sumar en el datagrid

Estimados amigos,

Tengo un datagrid, que que me funciona muy bien, y tiene dos columnas, una se llama
DEBE y la otra HABER

Se pueden sumar, para dar totales de ambas columnas, y si por ejemplo no cuadran
poder decir, no cuadran, el debe del haber.

saludes,

Jose

Tal vez no sea lo correcto, pero funciona:

Data1.RecordSource = "Select Sum(Columna1) From TuTabla"
Data1.Refresh
MSFlexGrid1.Row = 1
LblCantidad.Caption = Val(MSFlexGrid1.Text)
Data1.RecordSource = "Select * From Tutabla"
Data1.Refresh

Lo q hago es sumar la columna 1, pero como hago un select, el Grid1 solo pondra el valor de la suma, asi q que le indico q se vaya al renglon 1 y guardo su valor en la Lblcantidad, despues muestro todo los datos nuevamente de la tabla.

Espero que esto te ayuda!!!