碰到一个麻烦的问题

   工程中包含2个FORM和2个模块,1个类模块
    
   情况是这样的:
   我一个模块1中定义了一个全局变量 

    public DB as database (引用中添加了对DAO 2.5/3.51的引用)

    在FORM1中调用模块2的一个函数 DBOPEN(ODB as database) as boolean 来打开数据库(里面使用了 set odb=dbengine.workspaces(0).opendatabase())

   现在我想在FORM2中使用DB来进行SQL的查询，总是报错,找不到到底错在何处!~~
   FORM2中的代码也很简单的:

   dim rs as recordset
   dim ss as string

   ss="select * from xxx"
   set rs=db.openrecordset(ss,dbopensnapshot,dbsqlpassthrough)     '---这里就出错了,提示变量WITH块未定义??
    --------------------编程问答-------------------- dim   rs   as new  adodb.recordset 
没有引用ADO吧 --------------------编程问答-------------------- 他用的都是DAO,我3-4年前用的,后来一直用ADO,这个项目用的却是这么老的东西,唉

ADO是要用new 关键字的,DAO好象不用^ --------------------编程问答-------------------- 问题找到了，我晕~~FORM1和模块中都定义了这个全局变量,唉~~

补充：VB ,  基础类