关于类模块的问题！

Question

我新建了一个类模块，在这个类模块中，有几个变量是从数据库中取出的，但是，这几个变量在其他类模块中要用到，目前，我的做法是这样的，执行结果是没有出错，但是也无法正常在别的类模块中引用！代码如下：
Public gsne As StringSub GsInfo()  Call ConnData.opendb
  rs.Open "select gsne,ztqy,jxcqj,gsqc,lxr,shouji,dianhua,callji,chuanzhen,youbian,dizhi,khyh,yhzh,nashuihao,email,wangzhi,qy from gsinfo", conn, 1, 1
    gsne = Trim(rs("gsne"))
  rs.Close
  Set rs = Nothing
  conn.Close
  Set conn = NothingEnd Sub
在别的类模块中引用gsne的代码如下：
Public Sub QyZt()  Set gsname = New GongYong
  Response.Write gsname.gsneEnd Sub

Answer 1

当然啦，你在别的类模块里面的 gsname是新构造的GongYong类。
有两种办法。。
1. 在别的模块重新调用GsInfo获取数据
2. 全局定义一个GongYong类的gsname变量，然后call GsInfo，构造别的类的时候，那个“别的类”添加一个GongYong类的成员变量，将这个全局定义的gsname作为构造函数的参数传过去在那个类使用。。

Answer 2

Public Sub QyZt()  Set gsname = New GongYong
  gsname.GsInfo
  Response.Write gsname.gsneEnd Sub
第二个例子自己慢慢想咯...看看C语言关于类那些教程吧