无法直接使用dt作为sql语句。
Dim sql ="select * fr om dt where 名称 in (select 名称 fr om dt group by 名称 having count(编码)=1)"
红色dt要改成原来的一整段sql语句才行。不然,你在你db2那里做一个视图,这样可以方便使用表。