主题：请教选定行问题--(搞定)

If Tables("订单明细表").Current IsNot Nothing Then
    Dim dr As DataRow = Tables("订单明细表").Current.DataRow
    Dim wz As Integer = Tables("订单明细表").FindRow(dr)
    If wz >= 0 Then
        Tables("订单总表").Position = wz
    End If
End If

可以实现,订单明细表中选定行后,订单总表中的焦点行根据订单明细表中的行号进行同步选定.
那么如何实现:
如果订单明细表中一个客户很多条明细记录,基中每条记录的产品不同,那么我在选定订单明细表后,订单总表中的焦点行怎么根据客户名称和产品名称来选定行呢?