Hola, cómo estás? Fijate si en esta linea (Costo = Me.DataGridView1.Rows(i).Cells("Precio").Value.ToS tring) pruebas ponerlo así:
Código vb:
Ver originalCosto = Me.DataGridView1.Rows(i).Cells("Precio").ToString
Lo que hice fué sacarle el Value.
Salutes, me cuentas el resultado.
<<[[MIKOL]]>>