初学foxtable，在本站上看了很多贴子，参照了一段合并代码，但不成功，提示“列“”不属于表 人员信息表。“ 不知道是什么原因？恳请版主帮助。
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.Ok Then
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 & "'") IsNot 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
加好友 
发短信
Post By：2015/10/7 2:01:00 [显示全部帖子]
