多字段查询问题！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 多字段查询问题！

共有3109人关注过本帖树形打印复制链接主题：多字段查询问题！

zhupengfei

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：155 积分：1345 威望：0 精华：0 注册：2013/7/31 9:47:00

多字段查询问题！ 发帖心情

Post By：2014/10/25 14:05:00 [显示全部帖子]

Dim cx As WinForm.TextBox = e.Form.Controls("查询TextBox")

Dim flt As String

If cx.value="" Then

MessageBox.show("查询值不能为空!")

Else

For Each c As DataCol In DataTables("人员信息").dataCols

If c.IsString AndAlso c.name<>"在职状态" Then

flt = c.Name & " like '*" & cx.text & "*' or " & flt

End If

flt=flt & "r"

flt = flt.Replace("or r"," and 在职状态<>'离职'")

Tables("人员信息").Filter = flt

End If

我是希望多字段模糊查询，但是不包括已经离职的。这个代码哪里有问题。

zhupengfei

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：155 积分：1345 威望：0 精华：0 注册：2013/7/31 9:47:00

Post By：2014/10/25 14:10:00 [显示全部帖子]

上述代码，运行的结果是，并没有把离职的排查

zhupengfei

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：155 积分：1345 威望：0 精华：0 注册：2013/7/31 9:47:00

Post By：2014/10/25 14:31:00 [显示全部帖子]

弹框的内容，部门 like '* 张 *' or 科室 like '* 张 *' or 姓名 like '* 张 *' and 在职状态<>'离职'

逻辑上有问题吗？

主题：多字段查询问题！