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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 查找代码

共有2981人关注过本帖树形打印复制链接主题：查找代码

漂亮美眉vszh

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

加好友

发短信

等级：四尾狐帖子：893 积分：8064 威望：0 精华：0 注册：2013/5/30 11:27:00

查找代码

Post By：2015/4/18 9:28:00 [只看该作者]

图片点击可在新窗口打开查看此主题相关图片如下：3.jpg

各位大侠，需求是：查找某个时间段、并且核销=false、并且考勤等于'○', '×', '△', '$'的数据

Dim ks As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim f As String = "1=1"
If ks.Text > "" Then
f &= " and " & ks.Text & " in ('○', '×', '△', '$')"
End If
'msgbox(f)
e.Form.Controls("Table4").Table.Filter = f & "And "&"审核= false"

这句代码要怎么改？

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/4/18 9:38:00 [只看该作者]

If ks.Text > "" Then
f &= " and 时间段 = #" & ks.Text & "#"
End If

e.Form.Controls("Table4").Table.Filter = f & "And "&"审核= false and 考勤 in ('○', '×', '△', '$')"

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

主题：查找代码