楼上这么写适合少量的 要是array(100)的话那不累死了. 最好是先将数组每个值循环出来连接成符合sql的字符串 如(1,2,3,4,5...) 直接引用即可
sql = "SELECT * FROM TABLE WHERE AA IN (" '初始化查询字符串
For i = 0 to UBound(Ary) '从0循环到数组最大下标
sql = sql & Ary(i) & "," '将数组中每个值加在查询字符串后面
Next
sql = Left(sql,Len(sql)-1) & ")" '将最后一个逗号换为反括号