老师 我的表格现在实现了自动输入
例如输入张三, 如果表格有一个叫张三的人,他会自动填写张三的信息
但是现在问题来了,如果还有另外的人也叫张三 ,表格默认的还是第一张三的信息,这个我修改了,保存
如果下次我第三次再次输入张三,张三就有了不同的两个信息,我想实现如果出现这种情况,能不能出现一个提示框,列出了两个张三的信息可供我选择
我现在DataColChanged的代码
Select Case e.DataCol.Name
Case "姓名"
Dim fdr As DataRow = DataTables("基础信息表").Find("姓名 = '" & e.DataRow("姓名") & "'")
If fdr Is Nothing Then
fdr = e.DataTable.Find("姓名 = '" & e.DataRow("姓名") & "'")
End If
If fdr IsNot Nothing Then
e.DataRow("电话") = fdr("电话")
e.DataRow("地址") = fdr("地址")
e.DataRow("邮编") = fdr("邮编")
End If
End Select