以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  加载条件为表中的某一列数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=118793)

--  作者:fubblyc
--  发布时间:2018/5/11 9:25:00
--  加载条件为表中的某一列数据
甜老师,

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20180511092256.png
图片点击可在新窗口打开查看

加载条件为表里的会员卡号的这一列,要怎么写呢?

Dim Products As List(Of String)
Products = Forms("VIPRFM分析").Controls("table1").Table.DataTable.GetValues("会员卡号")

\'Forms("会员销售明细多个").Controls("table1").Table.DataTable.loadfilter= "会员卡号 in \'" & Products & "\' "
上面这句写不对

要达到下面这句的效果
Forms("会员销售明细多个").Controls("table1").Table.DataTable.loadfilter= "会员卡号 in (\'A018A150049390\',\'EA018A170186998\')  "
Forms("会员销售明细多个").Controls("table1").Table.DataTable.load(False)




--  作者:有点甜
--  发布时间:2018/5/11 9:59:00
--  
Forms("会员销售明细多个").Controls("table1").Table.DataTable.loadfilter= "会员卡号 in \'" & String.Join("\',\'", Products.toArray) & "\' "