Access模糊查询功能,输入关键字后自动展示下拉选项关键词
如图:
我这边用了组合框(名称随便取 Combo货号 ),查询按钮 工具
先做组合框下拉功能
点击组合框,属性设置
点击更新后 进入 事件过程设置,代码如下
Private Sub Combo货号_AfterUpdate()
Combo = True
End Sub
点击更改,进入事件过程设置,代码如下
Private Sub Combo货号_Change()
If Combo Then
Me.Combo货号.RowSource = "select DISTINCT 产品货号 from 商品信息表 where 产品货号"
Combo = False
Else
Me.Combo货号.RowSource = "select DISTINCT 产品货号 from 商品信息表 where 产品货号 like '*" & Me.Combo货号.Text & "*'"
Me.Combo货号.Dropdown ''' 属性表中关闭 [自动展开] ,代码中写 Dropdown '''
End If
End Sub
然后点击查询按钮
这就可以进行模糊查询了