主题：如何通过子表要素，查询主表

在订单主表-订单明细表的查询中，一般是通过对主表的订单客户、订单号等要素去查询。

现在想通过订单明细表中的要素，如产品的价格，规格等，去查询订单主表，请问该如何修改订单查询的“查询”代码？

界面：

此主题相关图片如下：问题1.jpg

含查询窗口的项目文件：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:查询子表.table

Dim ddh As WinForm.TextBox = e.Form.Controls("订单号")
Dim cj As WinForm.ComboBox = e.Form.Controls("订单查询厂家筛选")
Dim dj As WinForm.TextBox = e.Form.Controls("单价")
Dim gg As WinForm.TextBox = e.Form.Controls("规格")

Dim filter As String = "1=1"
Dim filter2 As String = "1=1"
If cj.Value <> "厂家筛选" Then
    If cj.Value <> "所有客户" Then
        filter &= " and 订单客户 = '" & cj.Value & "'"
    End If
   
    If ddh.Value > "" Then
        filter &= " and 客户订单号 like '%" & ddh.Value & "%'"
    End If
   
    If dj.Value > "" Then
        filter2 &= " and 单价 = " & dj.Value & ""
    End If
   
    If gg.Value > "" Then
        filter2 &= " and 型号规格 like '%" & gg.Value.Replace("*", "[*]") & "%'"
    End If
    Dim ddhs As String = "'" & DataTables("订单明细表").GetComboListString("客户订单号", filter2).Replace("|", "','") & "'"
    Tables("查询窗体_订单主表").Filter = filter & " and 客户订单号 in (" & ddhs & ")"
Else
    MessageBox.Show("未选择厂家!")
    cj.OpenDropDown
End If