杭州交通信息网王者荣耀召唤师出场地:VB程序问题2？修改注释====
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/07 15:30:21
Dim db As Database
Dim rs As Recordset
Dim strsql As String ‘定义查询语句
strsql = "select * from 接警" ‘选取数据库中的记录
Set db = OpenDatabase(App.Path & "\dbnew.mdb") ‘打开数据库
Set rs = db.OpenRecordset(strsql) ‘查询记录集
Dim rs As Recordset
Dim strsql As String ‘定义查询语句
strsql = "select * from 接警" ‘选取数据库中的记录
Set db = OpenDatabase(App.Path & "\dbnew.mdb") ‘打开数据库
Set rs = db.OpenRecordset(strsql) ‘查询记录集
一般都使用ado技术,你这使用的是DAO,都忘记得差不多了.注释应该基本上是对的.