SUMAR CELDAS EN UN DATAGRIDVIEW

'SUMA LA CELDA SELECCIONADA

Dim TOTAL As Single

Dim COL As Integer = Me.NOMBRE DEL GRID.CURRENTCELL.COLUMNINDEX

For Each ROW As DataGridViewRow In Me.NOMBRE DEL GRID.ROWS

 TOTAL += VAL(ROW.CELLS(COL).VALUE)

Next

Me.TEXTBOX1.TEXT = TOTAL.TOSTRING