Я использовал приведенный ниже код и округляет результат
Dim iTax As Double
If VacationsDataGridView.RowCount > 1 Then
For index As Double = 0 To VacationsDataGridView.RowCount - 1
iTax += Convert.ToDouble(VacationsDataGridView.Rows(index).Cells(3).Value)
Next
Label4.Text = iTax
End If
Я не знаю, в чем ошибка!