以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 过滤语句 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178488) |
-- 作者:edisontsui -- 发布时间:2022/7/6 14:19:00 -- 过滤语句 Dim txt As String = e.Form.Controls("TextBox1").Text Dim tbl As Table = Tables("日薪计算-零件代号输入_Table1") If txt = "" Then \' tbl.Filter = "" tbl.Filter = "冻结价格 = False" Else txt = "\'%" & txt & "%\'" \' tbl.Filter = "零件代号 Like " & txt & " Or 零件名称 Like " & txt & " Or 工序 Like " & txt tbl.Filter = "冻结价格 = False and (零件代号 Like " & txt & " Or 零件名称 Like " & txt & " Or 工序 Like " & txt & ")" End If 上面这段代码中,第二句冻结价格 = False是有效的,但是第一句冻结价格 = False却是无效的。请问为什么呢?谢谢。
|
-- 作者:有点蓝 -- 发布时间:2022/7/6 14:28:00 -- 没有问题。除非有其它代码影响了 |
-- 作者:edisontsui -- 发布时间:2022/7/6 15:08:00 -- 单单光标停留在输入框,上述红色代码是无效的,要按一下空格键,就会有效了。这是为什么呢? |
-- 作者:有点蓝 -- 发布时间:2022/7/6 15:31:00 -- 请上传实例说明 |