关于在com中定义变量

Question

我用vb编写，在一个dll中有多个类，我定义了一个ADODB.Connection变量DBConn,希望在所有的类中调用，这个变量怎么定义，是否定义为global呢？初始化怎么写

Answer 1

可以定一为global，也可以定一为一个类的成员，把这个类作为单实例的就可以了
DBConn.Open dbstring,....
就可以了
具体可选参数看看msdn

Answer 2

可以添加一个模块Context.bas:
Option ExplicitFunction GetDBConn() As ADODB.Connection
    Dim DBConn As ADODB.Connection
    '设置属性...
    Set GetDBConn=DBConn
End Function