VB中ADO怎么用啊？

来源：百度知道 编辑：UC知道 时间：2024/06/08 08:21:42
我下了个VB精简版 是不是不支持ADO啊 不见里面也没有 急 急 最近在做毕业设计啊 烦死饿 请问是什么原因 怎么样才能用上ADO啊？

VB精简版中只能用Adodb
VB企业版中可以用Adodb,也可以用Adodc了!
两种的用法基本一样啊!

下面给你一个简单的实例,希望你能学到点东西!

连接数据库

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + App.Path + "\hkmdck\db1.mdb"
Adodc1.RecordSource = "select * from tb1"
Adodc1.Enabled = True
Adodc1.Refresh

查询当前有多少条记录；当前记录为第几条

Private Sub Command1_Click()
Label1.Caption = "数据库共有 " & Adodc1.Recordset.RecordCount & " 条记录"
Label2.Caption = "当前记录为第 " & Adodc1.Recordset.AbsolutePosition & " 条记录"
End Sub

共同学习,共同努力!!!