- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]万能查询代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=83006)
-- 发布时间：2016/3/29 16:26:00
-- [求助]万能查询代码
求这样可以无限追加条件的查询代码-- 发布时间：2016/3/29 16:35:00
--
补充下，只要思路，不用写实际代码
-- 发布时间：2016/3/29 16:39:00
--
只要知道列名和查询的内容，就能合成条件了啊
-- 发布时间：2016/3/29 16:39:00
--
http://www.foxtable.com/help/topics/2178.htm
-- 发布时间：2016/3/29 16:48:00
--
我是想做个所有的表都能用的查询器，就是不知道怎样才能无限制追加条件
-- 发布时间：2016/3/29 16:50:00
--
比如说用文本框是三个框就最多3个条件，用表可以一直追加，但是查询语句不知道怎么加
-- 发布时间：2016/3/29 17:53:00
--
比如，条件可以这样合成。
Dim filter As String = "1=1"
For Each r As Row In Tables("表A").rows
filter &= " and " & r("第一列") & "=\'" & r("第二列") & "\'"
Next
msgbox(filter)