表1和表2中的编号那个数据大，显示那个，若一样显示一个

中原一剑　发表于：2018-06-04 17:15:43 　

当在窗体姓名中输入数据时，如果表1和表2都有出现同样的姓名如小林，窗体编号中显示10（表1和表2中的编号那个数据大，显示那个，若一样显示一个）
当在窗体姓名中输入数据时，如果表1或表2只有一个的话如姓名如小陈，窗体编号中显示5
求大师为我解答

点击下载此附件

Top

呵，年轻人发表于：2018-06-04 19:58:49

姓名控件更新后事件:

Private Sub 姓名_AfterUpdate()
    On Error Resume Next
    Dim a As String
    Dim b As String
    a = DLookup("编号", "表1", "姓名='" & Me.姓名 & "'")
    Me.Text2 = a
    b = DLookup("编号", "表2", "姓名='" & Me.姓名 & "'")
    Me.Text2 = b
    Me.Text2 = IIf(Val(a) > Val(b), a, b)
End Sub

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

表1和表2中的编号那个数据大，显示那个，若一样显示一个