关于水晶报表数据源的问题（VB）

现在 我 把 我的数据源 全部放到了 ACCESS 表里面了， 现在我想直接取 表里面的数据，注 ，里面需要取数的表 可能有几个，不同的表 在 水晶报表中的分别用子报表显示出来， 我根 怎么做
 oRpt.Database.Tables(i).SetDataSource rs1 不希望直接在 程序中赋值， 因为涉及的数据源太多了。


用 程序 把 SQL 数据源写入到本地的 accsee 里面，然后直接通过水晶报表 直接 连接 ACCSEE,
把表里的数据直接 取出来， 不希望 再 给水晶 报表 oRpt.Database.Tables(i).SetDataSource rs1 这样的直接赋值了， 现在 需要 解决的是 怎么让水晶报表 指向 accsee ,如果有多个子报表的怎么处理？

补充：VB ,  数据库(包含打印，安装，报表)