身份证号码？

碧空飞云

个人情况表，身份证号码是唯一的

如何在窗体身份证号字段输入后，自动检测信息是否存在于表中，如果有其他字段自动
调用显示！

碧空飞云

详细说明一下可以吗？

zhengjialon

用ADO打开另一个记录集，将值写到当前窗体里就行了。

碧空飞云

试过了！我是在个人情况表窗体中输入的身份证号码，重复后出现错误，需要调试该语句！

如果我在另一个表的窗体中输入的话，怎样才能将数据调入当前窗体？

andymark

当身份证号重复时，打开与此身份证号相应（个人情况表）窗体

碧空飞云

可以解释一下用法吗？

andymark

DoCmd.OpenForm "个人情况表", , , "身份证编号='" & Me.身份证编号 & " '", acFormEdit

碧空飞云

不明白

sea.er

requery

碧空飞云

Private Sub 身份证编号_BeforeUpdate(Cancel As Integer)
    Dim strMsg As String, strTitle As String
    Dim intStyle As Integer

If Not IsNull(DLookup("[身份证编号]", "个人情况表", "[身份证编号]='" & Me.身份证编号 & " ' ")) Then
strMsg = "此身份证号码已存在，请重新检查输入！"
        strTitle = "警告"
        intStyle = vbOKOnly
        MsgBox strMsg, intStyle, strTitle
        Cancel = True
End If
End Sub



根据andymark兄弟的提示，上面这个得到了更好的效果，解决了部分问题。

还有一个请大家帮一下，已有“身份证号码”出现提示后，在窗体中其他的与此身份证号对应的数据怎样才能更新显示出来？