0

我有一个嵌入了子表单数据表的 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

结束子

4

1 回答 1

0

如果还没有这样做,只需在子表单的查询中包含(必要时通过加入)[供应商]-名称。然后,您可以只查询[Vendor] LIKE ...而不是[VendorID].
要使其实时,您还必须使用Me.TxtVendorSearch.Text,因为文本框的值不会立即与可见文本同步。

于 2012-10-26T22:15:20.253 回答