有关adocommand参数的一个小问题？

Question

我想要做的是一个联合删除,删除和一条记录有关的所有数据，他们的主键都一样，语句如下面，我想在adocommand中作，如果像下面写法的话，adocommand就会当作6个参数处理，请问怎么才能合为一个参数（我用的是Access库，好像不支持存储过程）
delete  table1 where mid(gcjybh,1,8)=:bh
delete  table2 where mid(gcjybh,1,8)=:bh
delete  table3 where mid(gcjybh,1,8)=:bh
delete  table4 where mid(gcjybh,1,8)=:bh
delete  table5  where mid(gcjybh,1,8)=:bh
delete  table5 where mid(gcjybh,1,8)=:bh