初学者问题，大家多多帮忙！！！

Question

我想在一个module里声明一个ADODB.connection类型的对象，为的是让工程中的所有form都能使用它，可是VB却不让我这样做，咋办呀？？？？？

Answer 1

菜单栏：工程-引用，选Microsoft ActiveX Data Objects ....

Answer 2

如果要让所有窗体里面都可以使用一个Ado对象，可以在模块里面声明：
Public Cnn1 As New ADODB.Connection
Public Rs1 As New ADODB.Recordset
然后再要使用该对象的窗体里面建立连接：
Private Sub Form_Load()
    Cnn1.ConnectionString = "Provider=SQLOLEDB.1;Password=........"
    Cnn1.CommandTimeout = ...
    Cnn1.ConnectionTimeout = ....
    Cnn1.Open
End Sub
最后别忘了关闭连接：
    If Not Rs1 Is Nothing Then '断开连接
        If Rs1.State = 1 Then
            Rs1.Close
        Else
        End If
        Set Rs1 = Nothing
    Else
    End If
    If Not Cnn1 Is Nothing Then
        If Cnn1.State = 1 Then
            Cnn1.Close
        Else
        End If
        Set Cnn1 = Nothing
    Else
    End If

Answer 3

找到了。
顺便问一下大家，如果要拿ADODB.connection连接Access数据库，怎么写？

Answer 4

dim con as new ADODB.connection
dim ret as new ADODB.recordset
con.connectionstring="driver={microsoft access driver(*.mdb);dbq=数据库路径}"
con.open
ret.open "表名称或SQL语句",con