主题：[求助]导入或合并数据到FOXTABLE中时数据顺序

蓝版，用下面方式把EXCEL的数据导入到内部表中。EXCEL数据的导入顺序应该不会发生变化吧，是不是可以把EXCEL行号做为主键。

'让内部表行数>=EXCEL表中的行数-------------------------------------------------------↓

    Dim shr As Integer = sheet.Rows.Count  '取工作表的最大行数

    Dim dtr As Integer = dt.DataRows.Count  '取内部表最大行数

    Dim sdr As Integer = shr - dtr

    If shr > dtr Then    '如果excel表中总行数大于内部表总行数,则内部表增加相差的行数

        dt.AddNew(sdr)

    End If

'把EXCEL表中的数据导入到内部表中----------------------------------------------------↓

    For n As Integer = 0 To sheet.Rows.count-1        

        Dim r As DataRow = dt.DataRows(n)

        For m As Integer = 0 To nms.Length-1

            r(nms(m)) = sheet(n+1,m).value  '对应字段顺序必须一致

        Next

    Next

'-----------------------------------------------------------------------------------↑