المجموع قائمة من القيم في data gride

بافتراض ان وجود DataGridView ولتكن DG

		Dim Sum As Decimal = 0

		Dim i As Integer

		For i = 0 To DG.RowCount - 1
			Sum = Sum + DG.Item(i, 0).Value ' 0 the Column Number
		Next