主题：表经过下面的代码为什么在大料中不是顶行开始

DataTables("大料").DataRows.Clear

For Each dr1 As DataRow In DataTables("输入").Select("长 >" & 400)
      Dim dr2 As DataRow = DataTables("大料").AddNew
      For Each dc As DataCol In DataTables("大料").DataCols
               dr2(dc.Name) = dr1(dc.Name)
      Next
Next