此主题相关图片如下：7d7g5dh@x~kd(i``ui{b9l.png
我想先判断公积金那一列中如果“-”则返回空值，还有如何通过编号来确定该数据已经添加不要重复再添加了 请各位老师帮忙修改一下，谢谢！
Dim dlg As New OpenFileDialog
dlg.Filter = "Excel文件|*.xls"
If dlg.ShowDialog = DialogResult.OK Then
Dim Book As New XLS.Book(dlg.FileName)
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim dr As DataRow = DataTables("员工").AddNew
dr("编号") = sheet(1,1).Text
dr("姓名") = sheet(2,1).text
dr("出生年月") = sheet(2,3).text
dr("职位") = sheet(3,3).text
dr("月薪") = sheet(4,1).text
dr("公积金") = sheet(4,4).text
dr("入职时间") = sheet(3,1).text
dr("档案时间") = sheet(1,4).text
End If
加好友 
发短信
Post By：2015/6/25 17:49:00 [显示全部帖子]
