[求助]表A录入人员信息时如何Select 表B身份证号相同人员？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

各位老师，人事类项目中有两个表，分别是《在职人员信息表》和《离职人员信息表》，现在向《在职人员信息表》录入人员信息时，为了避免重复录入，我参照开发指南写了下面的两段代码，代码写在录入窗口身份证号控件Leave事件下，第一段代码能用，第二段代码不能用，请老师看看错在哪里，改一下。谢谢！！！

'-----以下是从在职人员表查找身份证号重复的行

Dim drs As List(of DataRow) = DataTables("在职人员信息表").Select("", "身份证号")

For i As Integer = drs.count - 1 To 1 Step - 1

If drs(i)("身份证号") = drs(i-1)("身份证号") Then

Forms("重复录入提示窗口之一").open

End If

'-----以下是从离职人员表查找身份证号重复的行

Dim drs As List(of DataRow) = Tables("在职人员信息表").filter = "身份证号 in ('" & DataTables("离职人员信息表").GetComboListString("身份证号") & "')"

For i As Integer = drs.count - 1 To 1 Step - 1

If drs(i)("身份证号") = drs(i-1)("身份证号") Then

Forms("重复录入提示窗口之二").open

End If

主题：[求助]表A录入 人员信息时如何Select 表B身份证号相同人员？