动态加载，如何做模糊查询 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请大神指点！下面的代码如何做模糊查询。我应该把 Like加在哪里？

Dim nms() As String = {"井号","采集日期"}

Dim sps() As String = {"'","'"}

Dim bjf() As String = {" = "," = "}

Dim fds() As String = {"油井","采集日期"}

Dim Filter As String

For i As Integer = 0 To nms.length - 1

If e. Form.Controls(nms(i)). Value IsNot Nothing Then

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & fds(i) & bjf(i) & sps(i) & e.Form.Controls(nms(i)).Value & sps(i)

End If

DataTables("日电能").LoadFilter = Filter

DataTables("日电能").Load()

[此贴子已经被作者于2020/6/3 23:38:59编辑过]

主题：动态加载，如何做模糊查询