vb+access

是不是使用了ADO控件连接数据库。就不用再代码中写如下语句：objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\数据库\db1.mdb"
    objCn.Open
    '执行查询命令，获得用户登录的密码 --------------------编程问答-------------------- 那你为什么不直接写代码呢？？搞不明白你。。。
--------------------编程问答-------------------- 可以的啊？不过一般写代码拉？ --------------------编程问答-------------------- 可以写，也可以不写，不写的话，要在ADODC1的属性中添加连接串及数据源。
--------------------编程问答-------------------- 可以用代码来设置，也可以手动设置 --------------------编程问答-------------------- 其实加个ADO控件要比写那字符串麻烦吧：） --------------------编程问答-------------------- dim db,rs,sql
set db=opendatabase(app.path+"\mydb.mdb")'打开库
sql="select * from mytable"
set rs=db.openrecordset(sql)'打开表
这样简单也好理解，毕竟只是个ACESS，要那么复杂干什么

补充：VB ,  基础类