主题：[求助]

Dim dt As Table = Tables("物料清单表")
Dim boms() As  String
Dim lst As new List(of String)
For Each dr As Row In dt.Rows
   Dim s As String = Cstr(dr("ID"))
     lst.Add(s)
  msgbox(lst)
Next
我想获取物料清单表里的ID列生成一个数组，这样做为什么不行（ID列为整型数据）

lst是集合  你怎么能 msgbox(一个集合呢?)

而且狐表本事就有getValues 函数可以直接获得一个列的集合

问题是这列数据类型为整型，我想把它生成一个数组，用到SQL里做查询条件where ID in 数组，老是提示出错

 

完整代码发上来，说明哪里出错。

提问请直接抓重点,绕半天发现问的根本不是这个.

Dim dt As Table = Tables("物料清单表")
Dim s As  String
s = Tables("GY物料清单表").DataTable.GetComboListString("ID")
Dim boms() As String = s.Split("|")
Dim cmd As new SQLCommand
cmd.C
cmd.CommandText ="select * from {物料清单明细表} where ID in boms"
rdt = cmd.ExecuteReader

少发了一个数据源

Dim dt As Table = Tables("物料清单表")
Dim s As  String
s = Tables("GY物料清单表").DataTable.GetComboListString("ID")

Dim cmd As new SQLCommand
'cmd.C
cmd.CommandText ="select * from {物料清单明细表} where ID in (" & s.Replace("|", ",") & ")"
rdt = cmd.ExecuteReader