请教：如何动态设定ADO控件的属性

Question

Adodc1.connectionstring="Provider=Microsoft.jet.oledb.4.0;Data Source=*.mdb"就可以了记住在Form_load事件中

Answer 1

Option ExplicitPrivate Sub Form_Load()    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\CBSP\cbsp.mdb;Persist Security Info=False"
    Adodc1.RecordSource = "Select * from [user]"
    Set DataGrid1.DataSource = Adodc1
    
End Sub

Answer 2

在Form_Load事件中加入以下代码
with adodc1
  .connectionstring="Provider=Microsoft.jet.oledb.4.0;Data       Source=*.mdb"
end with

Answer 3

Private Sub Form_Load()    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=数据库名（可以包括路径）;Persist Security Info=False"
    Adodc1.RecordSource = "Select * from 表名"
End Sub

Answer 4

谢谢,再问一下，运行后，出现错误;Run-time error '91':
object varible or with block not set,我选择“debug",结果指向了ADO控件，怎么回事？我没有MSDN，谢谢了！