
展开全部
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语句代码段
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
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
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询