合成这样的sql语句
select * from 库存表 where (仓库+"." + 产品编码) in ('仓库1.a1','仓库1.a2')
集合转换成字符串这样处理 http://www.foxtable.com/webhelp/scr/1423.htm
Dim str As String = string.join("','", s1.toarray)
msgbox(str)