如何实现跨表查询？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

需求：通过产品表的产品编号查询出订单表的相同的产品编号的数据，不是定位，是查找数据

下面代码，是定位，不象查询那样将产品的产品编号把订单的产品编号相同的数据全部列出，其他不相关不显示，如何实现？

Dim wz As Integer

Dim dr As DataRow

dr = DataTables("订单").Find("[产品编号] = '" & e.Table.Current("产品编号") & "'")

If dr IsNot Nothing Then

wz = Tables("订单").FindRow(dr)

If wz >= 0 Then

Tables("订单").Position = wz

End If

主题：如何实现跨表查询？