搜索查询需要正确的数字标准

时间:2016-08-24 18:35:10

标签: ms-access access-vba

我已经在一个小项目上工作了几天,该项目在表格中搜索在四个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

1 个答案:

答案 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