vb 中ado控件如何使用

ADO控件是不可见的
Dim conn As New ADODB.Connection '创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行
Dim rs As ADODB.Recordset '创建一个 Recordset 实例，不使用New 是因为，经常需要重复使用Set，因此没必要在这里使用
Dim CnStr As String, Sql As String '创建两个字符串变量分别存放两个集合的SQL语句代码段

adodc控件可以配合datagrid控件使用。。
connstring = "provider=Microsoft.Jet.OLEDB.4.0;Data source =" & App.Path & "/xxx.mdb"
Adodc1.ConnectionString = connstring
Adodc1.RecordSource = "select * from xx"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1