以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 有劳解析 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90223) |
-- 作者:hbhb -- 发布时间:2016/9/7 22:42:00 -- 有劳解析 大师:红色部分的代码为何不对?为什么? 有的为什么这样写正确? Dim comb1 As WinForm.ComboBox = e.Form.Controls("ComboBox31") Dim comb2 As WinForm.ComboBox = e.Form.Controls("ComboBox2") Dim tb3 As WinForm.Table = e.Form.Controls("Table3") \'tb3.Table.Filter = "dtwlmxb2 = \'" & comb1.Value & "--" & comb2.Value & "\'" Or "dtwlmxb2 = \'" & comb2.Value & "--" & comb1.Value & "\'" tb3.Table.Filter = "dtwlmxb2 = \'" & comb1.Value & "--" & comb2.Value & "\' Or dtwlmxb2 = \'" & comb2.Value & "--" & comb1.Value & "\'"
|
-- 作者:hbhb -- 发布时间:2016/9/7 22:44:00 -- 自己搞错了,不好意思! |
-- 作者:有点蓝 -- 发布时间:2016/9/7 22:48:00 -- 红色最终结果等同于下面2种 Tables("表A").Filter = true Tables("表A").Filter = False 属于代码条件,而不是表达式条件
|