[VB6] Somma tra colonna datagrid

[OrcaAssassina]

Come posso eseguire la somma tra due colonne di una datagrid????

Ho provato questo metodo:

Private Sub Command4_Click()
DataGrid2.Columns(3) = Val(DataGrid2.Columns(1)) + Val(DataGrid2.Columns(2))
End Sub

E' funzionante solo che ha 2 GRANDI PECCHE:

1) Esegue il calcolo solo al record selezionato...invece a me serve
eseguirlo per tutti i record
2) Se modifico l'ordine delle colonne e conti impostati sono errati,
sarebbe da impostarlo con i nomi dei campi

C'è un metodo per crearlo come io ho chiesto?????

Ciao e grazieeeeeeeeee