主题：求助：如何在表的行里增加一个表

 再做一个价格明细表，关联产品表。

 价格明细表，包含产品、客户、价格信息。

 回复6楼，如下，你的项目不是一般的乱......

 能按部就班把帮助文档看一次吗？先不要急着做项目？

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

点击浏览该文件:测试数据11.zip

 最后一句，改成

Dim cpmc As WinForm.TextBox = e.Form.Controls("产品名称")
Dim lb As WinForm.ComboBox = e.Form.Controls("类别")
Dim pz As WinForm.ComboBox = e.Form.Controls("牌子")

Dim Filter As String = "1=1 "
With e.Form.Controls("产品名称")
    If .Value IsNot Nothing Then
        Filter &= " and 产品名称 like '*" & cpmc.text & "*'"
    End If
End With
With e.Form.Controls("类别")
    If .Value IsNot Nothing Then
        Filter &= " and 类别 ='" & lb.text & "'"
    End If
End With
With e.Form.Controls("牌子")
    If .Value IsNot Nothing Then
        Filter &= " and 牌子 ='" & pz.text & "'"
    End If
End With
If Filter > "" Then
    e.Form.Controls("Table1").Table.Filter = Filter
End If