รบกวนช่วยเขียนคำสั่งวน loop เพื่อคำนวณยอดเงินปันผลครับ VB.NET2005

Dim dataColumn As DataColumn = New DataColumn()
dataColumn.ColumnName = "ยอดเงินปันผล"
dataColumn.DataType = System.Type.GetType("System.Double") 'ถ้า Type ไม่ถูกก็รบกวนแก้ด้วย

dataTable.Columns.Add(dataColumn)

For Each dataRow As DataRow In dataTable.Rows
    Dim Result As Double
    Result = CDbl(dataRow(2)) * CDbl(dataRow(3)) 'index ที่ 2 และ 3 คือ จำนวนหุ้น, อัตราการปันผล ตามลำดับ
    dataRow(4) = Result 'index ที่ 4 คืออันที่เพิ่มเข้าไปใหม่
Next

DataGridView1.DataSource = dataTable