Va bene, sono grande, invecchiato a forza di combattere con Ms., ma che fare?

Comunque, credo di avere già risolto.

Non debbo creare il progressivo dal DataTable, ma dal DataTable.DefaultView

Con questo codice vedo che va
codice:
Dim progressivo As Decimal = 0
Dim dv As DataView = dt.DefaultView
For Each r As DataRowView In dv
	Dim status_old As DataRowState = r.Row.RowState
	progressivo += CDec(NullToZero(r("valore_operazione")))
	r("progressivo") = progressivo
	If status_old = DataRowState.Unchanged Then
		r.Row.AcceptChanges()
	End If
Next
ciao