以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  查找请教  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=45625)
--  作者：lsy
--  发布时间：2014/2/7 8:15:00
--  

Dim t As Table = Tables("表A")
t.Filter = ""
t.Sort = "编号"
Dim id As String
For i As Integer = 4 To 19

    id + = t.Rows(i)("_Identify") & ","
Next
t.Filter = "_Identify In (" & id.Trim(",") & ") And 数量 > 5"

[此贴子已经被作者于2014-2-7 8:15:28编辑过]
--  作者：lsy
--  发布时间：2014/2/7 11:27:00
--  

代码已经贴上了，该不会这点变通也不会吧？

要么例子传上来，需求说详细点，做好给你。
--  作者：Bin
--  发布时间：2014/2/7 11:28:00
--  
2楼的代码没错啊.