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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → like 表达式

共有8378人关注过本帖树形打印复制链接主题：like 表达式

SZDVYE

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

加好友

发短信

等级：童狐帖子：213 积分：2228 威望：0 精华：0 注册：2012/2/3 14:14:00

Post By：2012/6/16 19:49:00 [只看该作者]

谢谢狐狸爸爸，但是问题只解决了一半。

“金额” 和 “日期”列模糊筛选怎么编写呢？谢谢再帮我一下啦

SZDVYE

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

加好友

发短信

等级：童狐帖子：213 积分：2228 威望：0 精华：0 注册：2012/2/3 14:14:00

Post By：2012/6/18 14:04:00 [只看该作者]

狐狸爸爸，可以帮帮处理吗？

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47448 积分：251048 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/6/18 14:09:00 [只看该作者]

金额和日期，没有模糊筛选，金额和日期，只有大于、小于、等于、不大于、不小于、不等于或者某个范围之内的筛选。

blackzhu

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

加好友

发短信

等级：狐仙帖子：9875 积分：57584 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2012/6/18 15:49:00 [只看该作者]

Dim drp As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim tbl As Table = Tables("窗口1_Table1")
If drp.Text = "" Then '如果内容为空
    tbl.Filter = "" '显示所有客户
Else '否则根据输入内容进行模糊筛选
    Dim txt As String = "'*" & drp.Text & "*'"
    tbl.Filter = "客户ID Like " & txt & " Or 产品Id Like " & txt  & " Or 单价 = " & drp.Text
End If

日期的你研究一下吧.

下一主题 >> << 上一主题

总数 14 上一页 1 2

主题：like 表达式