VB+Access实例：使用ADO连接Access数据库

VB Access实例 ADO 连接

VB+Access实例：使用ADO连接Access数据库。Private Sub Form_Load() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db_medicine.MDB" rs.Open "tb_kc", cn, adOpenKeyset, adLockOptimistic 'adOpenKeyset打开键集类型游标。adLockOptimistic开放式锁定（逐个） — 提供者使用开放式锁定，只在调用Update 方法时才锁定记录 Set MSHFlexGrid1.DataSource = rs MSHFlexGrid1.ColWidth(0) = 0 '返回或设置指定带区中的列宽 rs.Close cn.Close Set rs = Nothing Set cn = Nothing End Sub

文件下载

资源详情

[{"title":"（ 5 个子文件 18KB ） VB+Access实例：使用ADO连接Access数据库","children":[{"title":"使用ADO连接Access数据库","children":[{"title":"Form1.frm 1.85KB ","children":null,"spread":false},{"title":"工程1.vbp 880B ","children":null,"spread":false},{"title":"db_medicine.mdb 292.00KB ","children":null,"spread":false},{"title":"MSSCCPRJ.SCC 190B ","children":null,"spread":false},{"title":"工程1.vbw 49B ","children":null,"spread":false}],"spread":true}],"spread":true}]

评论信息

其他资源

免责申明

【只为小站】的资源来自网友分享，仅供学习研究，请务必在下载后24小时内给予删除，不得用于其他任何用途，否则后果自负。基于互联网的特殊性，【只为小站】无法对用户传输的作品、信息、内容的权属或合法性、合规性、真实性、科学性、完整权、有效性等进行实质审查；无论【只为小站】经营者是否已进行审查，用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。
本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二条之规定，若资源存在侵权或相关问题请联系本站客服人员，zhiweidada#qq.com，请把#换成@，本站将给予最大的支持与配合，做到及时反馈和处理。关于更多版权及免责申明参见版权及免责申明

VB+Access实例：使用ADO连接Access数据库

文件下载

资源详情

评论信息

其他资源

免责申明

个人信息

热门下载

最新下载