以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- like 表达式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=20626) |
||||
-- 作者:SZDVYE -- 发布时间:2012/6/14 1:13:00 -- like 表达式 表达式报错了,请指点: 表“支票”中,想筛选出收款人列(字符型) 或日期列(日期时间型) 或支票号码列(字符型) 或金额列(双精度小数),为组合框内的指定录入内容 Dim txt4 As String = e.ComboBox.Text Dim tbl4 As Table = Tables("支票") If txt4 = "" Then Tbl4.Filter = "" Else Txt4 = "\'*" & txt4 & "*\'" Tbl4.Filter = "支票号码 Like " & txt4 & " Or 收款人 Like " & txt4 & " Or 金额 Like " & txt4 & " Or 日期 Like " & txt4 End If
|
||||
-- 作者:狐狸爸爸 -- 发布时间:2012/6/14 6:54:00 -- like只是针对字符型,数值日期不存在Like,数值和日期只能=, >, <, <>, >=, <= |
||||
-- 作者:hp001 -- 发布时间:2012/6/14 6:56:00 -- 怎么早啊,狐爸 |
||||
-- 作者:SZDVYE -- 发布时间:2012/6/14 23:36:00 -- 3楼有什么疑问啊? |
||||
-- 作者:SZDVYE -- 发布时间:2012/6/14 23:54:00 -- 狐狸爸爸,还是没有琢磨出表达式该怎么写?请指教。 |
||||
-- 作者:blackzhu -- 发布时间:2012/6/15 7:27:00 -- Dim txt4 As String = e.Sender.Text Dim tbl4 As Table = Tables("支票") If txt4 = "" Then Tbl4.Filter = "" Else Txt4 = "\'*" & txt4 & "*\'" Tbl4.Filter = "支票号码 Like " & txt4 & " Or 收款人 Like " & txt4 & " Or 金额 Like " & txt4 & " Or 日期 Like " & txt4 End If 首先肯定错,已改了下.第二,数值,日期等不能模糊筛选. |
||||
-- 作者:程兴刚 -- 发布时间:2012/6/15 7:35:00 -- 改了还是错,楼主应该发文件,想知道您的具体需求! |
||||
-- 作者:SZDVYE -- 发布时间:2012/6/16 1:17:00 -- 文件已经上传,麻烦老师们了。
|
||||
-- 作者:SZDVYE -- 发布时间:2012/6/16 14:48:00 -- 老师,请问我的问题可以帮我解决吗? |
||||
-- 作者:狐狸爸爸 -- 发布时间:2012/6/16 15:04:00 -- Dim txt4 As String = e.ComboBox.Text Dim tbl4 As Table = Tables("支票") If txt4 = "" Then Tbl4.Filter = "" Else Txt4 = "\'*" & txt4 & "*\'" Tbl4.Filter = "支票号码 Like " & txt4 & " Or 收款人 Like " & txt4 End If |