不大明白。我见有很多例子都不需要添加类模块，而是在一般窗体上直接这样编写：
Dim db Database
set db =workspaces(0).opendatabases(App.path&"\数据库名.mdb")
即可连接上数据库。是不是一定要用Data 控件来绑定数据库才能这样编写？

哦,那上面的那段代码是否都能用于INI后缀和mdb后缀呢？

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\system.ini;"这段代码有错....不知错在那里！！！

不是，不过我用以下方式为什么打不开数据库?
dim conn as new adodb.connection
conn.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\数据库名.mdb"
conn.open

谢谢！！

哈哈哈哈.......谢谢........