各位大虾看看一个数据库的问题？谢谢了~~

Question

我要将多个access数据库的数据导入一个access数据库中，但每个数据库中的 表名不一样，我要如何设表明为变量，导一个数据库我没有问题：Rs.Open "select * from ### ", Conn。 ###为表名，请大家指点一下~~~

Answer 1

private sub opentable(tablename as string)
  Rs.Open "select * from " & tablename, Conn
end sub'调用
call opentable("table1")
call opentable("table2")
...