此主题相关图片如下:ku~2n1r3y~dpah@ug{mzdo3.png
我的新增和修改界面都用的这个界面 但在保存按钮上出现问题 就是我新增的时候得判断身份证号码是否重复 但是修改的时候保存就不用判断 但保存按钮都是一个 该怎么实现呢 保存代码如下:
Dim drs As List(of DataRow)= DataTables("HR_花名册").SQLSelect("身份证号码='" & Tables("HR_花名册").Current("身份证号码") & "'")
If drS.Count>0 Then
MessageBox.Show("身份证号码重复!!!")
Else
Tables("HR_花名册").Current.Locked=True
Tables("HR_花名册").Current.DataRow.Save
e.Form.Close
End If