如图:
exception说的比较清楚了,已经从list里删除的这行就不能再读取了,
所以在读取之前做一个判断去处理就可以了:
For Each coderow As CourseDataset.T_RO_COURSERow In Me.m_myAllCoursesDS.T_RO_COURSE.Rows
If coderow.RowState <> DataRowState.Deleted Then
dMoeCode = coderow.MOE_CODE
End If
Next