我已经在一个小项目上工作了几天,该项目在表格中搜索在四个TextBox中输入的条件,使用链接到查找结果的查询的ListBox。我的问题是我可以很好地搜索文本数据类型字段,但是有一个名为' Age'的字段,我找不到要放入查询的正确标准语法。
我使用的标准是:Like "*" & [forms]![SearchTab]![schAge] & "*"
它适用于文本字段,但不适用于一个数字字段。 没有太多的VBA代码,只是为了TextBox的OnChange来重新查询列表框,如下所示:
Private Sub schAge_Change()
Dim SAge as Variant
SAge = schAge.Value
Me.lstResults.Requery
End Sub
答案 0 :(得分:1)
您是否尝试过滤/搜索可以找到某些字符串的记录?然后使用。
Like '*" & [forms]![SearchTab]![schAge] & "*'"
否则,
= " & [forms]![SearchTab]![schAge] & "
此外,由于您使用的是Change
事件,请使用schAge.Text
获取最后一个文本输入。 schAge.Value
只返回文本框的更新前的最后一个值。 注意:我没有看到上面这段代码的任何关系。你在哪里使用SAge?
Private Sub schAge_Change()
Dim SAge as Variant
SAge = schAge.Text
Me.lstResults.Requery
End Sub