我有一个嵌入了子表单数据表的 Microsoft Access (2010) 表单。我的目标是在每个数据表列上方有一个未绑定的文本框,允许用户键入文本来过滤该列。
数据表列之一,供应商,显示基于 tblVendor 表的供应商名称列表。它通过对用户不可见的 VendorID 列绑定到数据表。
我使用以下代码,但它似乎只查询 VendorID 列上的数据表。我想查询文本。例如,我希望用户输入“Microsoft”,而不是“21”(Microsoft 的 VendorID)。
Private Sub TxtVendorSearch_Change()
Dim str1 As String
str1 = "[VendorID] LIKE '*" & Me.TxtVendorSearch & "*'"
Me!subOrderDS1.Form.Filter = str1
Me!subOrderDS1.Form.FilterOn = True
结束子