Foxtable(狐表)用户栏目专家坐堂 → [求助]如何实现模糊搜索


  共有1909人关注过本帖平板打印复制链接

主题:[求助]如何实现模糊搜索

帅哥哟,离线,有人找我吗?
新狐
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:7 积分:128 威望:0 精华:0 注册:2017/6/14 15:23:00
[求助]如何实现模糊搜索  发帖心情 Post By:2017/6/16 16:37:00 [只看该作者]

刚刚按照设计查询窗口的模版做了一个小程序,可是做实际操作中在“车型”列中内容较多,查询时无法实现模糊查询,如图,想要查找“欧宝”就无法实现查找,请专家予以指导,在原程序中如何修改,
Dim Filter As String
With e.Form.Controls("车型")
    If .Value IsNot Nothing Then
        Filter =Filter &  "车型= '" & .Value & "'"
        End If
End With
With e.Form.Controls("年份")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "年份 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("排量")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "排量 = '" & .Value & "'"
    End If

[此贴子已经被作者于2017/6/16 16:51:28编辑过]

 回到顶部