Когда мое приложение проходит через первый блок кода ниже, я получаю действительные данные для всех полей datarow.
For Each dRow In dtExportAddr.Rows
dtExportAddr.Rows.Add(dRow("MgrID"), dRow("LocationNum"), dRow("DeptNum"), dRow("AddressLinkID"), dRow("PositionID"))
Next
Но я получаю сообщение об ошибке при цикле через этот блок кода "Сбор был изменен; операция перечисления может не выполняться."
Поэтому я использую кодблок ниже:
Dim rowCount As Integer = dtExportAddr.Rows.Count
Dim index As Integer = 0
For index = 0 To rowCount - 1
Dim dRow As DataRow = dtExportAddr.Rows.Item(index)
dtExportAddr.Rows.Add(dRow("MgrID"), dRow("LocationNum"), dRow("DeptNum"), dRow("AddressLinkID"), dRow("PositionID"))
Next
Однако во втором блоке кода я получаю допустимую запись для MgrID, но я получаю пустое значение для других полей.
Когда я просматриваю базу данных, всеполя в этой таблице имеют допустимые значения.
Что будет причиной пустых значений?