主题：请教！代码优化？

有两个表，一个“配缸表”，另一个“成品入库表”；两个表都有“缸号”列；加入“配缸表”产生10000个缸号；最后在“成品入库表”只有9000个缸号，想用代码把1000个没有入到“成品入库表”的缸号找出来，写了下面的代码，可以找到但是要10几秒时间，请老师帮我看看有更好的代码写法；谢谢！table5就是“配缸表”

尝试直接写sql语句，比如

 

Dim sql语句 = "select * from {配缸表} where 缸号 not in (select 缸号 from {成品入库表} where 缸号 is not null)"

Tables(e.Form.Name & "_table5").fill(sql语句,"数据源",false)

甜老师，能写详细一点吗？没有写过SQL语句

like怎么写到SQL

比如

 

Dim sql语句 = "select * from {配缸表} where 缸号 not in (select 缸号 from {成品入库表} where 缸号 is not null and 缸号 like '" & ghkt.text & "%')"

试了，真的很快！