主题：[求助]

 不能使用这个方法导入指定列不重复的行。

 需要自己编码合并。

 大概这样，你改一下红色部分就行了。

Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls"

If dlg.ShowDialog = DialogResult.Ok Then
    MessageBox.Show("你选择的是:" & dlg.FileName,"提示")
    Dim Book As New XLS.Book(dlg.FileName)
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
    Dim colNames As New List(Of String)
    For i As Integer = 0 To sheet.Cols.Count - 1
        colNames.Add(sheet(0, i).Text)
    Next
   
    Dim dt As DataTable = DataTables("工资表")
    For i As Integer = 1 To sheet.Rows.Count - 1
        If dt.Find("区 = '" & sheet(i,0).Text & "' And 学校 = '" & sheet(i,1).Text & "'") Is Nothing Then
            Dim ndr As DataRow = dt.AddNew
            For j As Integer = 0 To sheet.Cols.Count - 1
                ndr(colNames(j)) = sheet(i, j).Text
            Next
        End If
    Next
End If

 呃……编码做的就是你想要的。上传你的数据文件或者例子，帮你完成以下。

楼主你上传文件嘛 不知道你想怎么做的，xls文件和table文件。

每个学校只能报一次，那么如何做到报多个学生？我这个我真不懂。不是每个报名一行数据么？

 但是，合并的条件如果是 区和学校，那么也就是说一个学校只能合并一条数据，只有一个学生可以报名啦，是不是矛盾了？

 你的意思是否可以这样理解？

 最初，报名表是空的。在合并一次xls数据时，如果发现学校不存在，就允许这一次xls数据中这个学校所有数据的导入；否则(学校已经存在)，不再导入学校数据。

 简言之，学校不存在，导入这一次xls的所有数据；学校存在，一个也不导入？

大概是这样，简单一点的做法是使用一个临时表做过度。