How to add row in the Data grid view one by one fron the datatable

For Each Dr As DataRow In RTable.rows
LCount = DGVAmount.Rows.Add()
DGVAmount.Rows(LCount).Cells("CustID").Value = Dr.Item("ID")
DGVAmount.Rows(LCount).Cells("CustName").Value = Dr.Item("Name")
Next