




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、ACCESS数据库和 VB 的连接Edited by Ryan 20131、建立 Access 数据库2、启动 VB,建立标准 EXE图1图23、添加 ActiveX 控件鼠标指向任意 VB 控件,单击右键,选择“部件(O)”,出现图 3 所示界面图6图3选择部件“ Microsoft ADO Data Control 6.0 (OLEDB) ”,出现如图 4 所示控件图44、添加控件 Adodc图57 所示界面4、在控件 Adodc 上添加数据源鼠标指向控件 Adodc1 ,单击右键,选择“ ADODC 属性”,弹出如图图7单击“生成 (U). . .”,弹出如图 8 所示界面图8选择“ M
2、icrosoft Jet 4.0 OLE DB Provider”,单击“下一步 (N) >>”,弹出如图 9 所示界面图9单击“ . . .”,添加数据源(第一步所建 Access 数据库),如图 10所示图 10单击“测试连接( T)”,出现提示框,如图 11 所示图 11之后点击“确定” ,退回到如图 12 所示界面图 12单击“记录源” ,弹出如图 13 所示界面图 13输入“ Select *在“命令类型”下,选择“ 1 - adCmdText”,在“命令文本 ( SQL)”下 from test1 ”,最后单击“应用” ,“确定”即可之后,进入程序书写部分 程序部分需要
3、注意接头形式及简单例子如下:Private Sub Command1_Click() VB 按钮控件Source=D:readDim mydb As New ADODB.Connection 定义新的数据库连接 mydb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data databasetest1test1.mdb" 数据库绝对路径Dim rs As New ADODB.Recordset 定义数据库的一个对象 mydb.Open 打开数据库rs.Open "select * from test1", mydb, 3, 3 打开数据库中的表 test1For i = 1 To 1 rs.MoveNext! For 循环控制选择哪一行Next iMe.Text1.Text = rs.Fields(1).Va
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二零二五年度档口租赁及节假日临时餐饮服务合同
- 电商平台合同成立时点及合同效力认定标准探讨
- 房产买卖合同纠纷调解协议范本
- 二零二五版女性权益保障离婚协议示范文本
- 二手房全款购买与贷款组合服务合同
- 建筑工程合同审查法律服务委托合同
- 2025版养老产业担保合同履行流程与责任承担
- 二零二五年房产经纪行业房产买卖租赁客户关系管理体系合同
- 二手房合伙人房产交易市场信息共享协议
- 房产销售溢价预售监管合同
- DB63∕T 2330-2024 小微企业融资信用评价规范
- 2025四川省安全员B证考试题库附答案
- 利用神经网络与InSARGNSS技术进行尾矿库坝体时序监测与预测分析
- 钢结构工程施工安全要点
- 停呼等三原则培训课件
- 2025年广西中考数学真题试卷及答案
- MT/T 1212-2024煤矿信息综合承载网通用技术规范
- 氢能产业链中的区块链技术如何助力碳足迹认证
- 2025年福建省高考物理试卷真题(含答案解析)
- 2025年《民航服务心理学》课程标准(含课程思政元素)
- 事业单位请假新版制度管理统一规定
评论
0/150
提交评论