如图vb连接access数据库及数据读写操作

vb连接access数据库  时间:2021-02-26  阅读:()

ACCESS数据库和VB的连接

Edited by Ryan 2013

1、建立Access数据库

2、启动VB建立标准EXE

图1

3、添加ActiveX控件

鼠标指向任意VB控件单击右键选择“部件O” 出现图3所示界面感谢下载载

图2

图3

感谢下载载

选择部件“MicrosoftADO Data Control 6.0(OLEDB)” 出现如图4所示控件

图4

4、添加控件Adodc

感谢下载载

图5

4、在控件Adodc上添加数据源

鼠标指向控件Adodc1 单击右键选择“ADODC属性” 弹出如图7所示界面

图6

感谢下载载

图7

单击“生成(U). . .” 弹出如图8所示界面

图8

选择“MicrosoftJet4.0 OLE DB Provider” 单击“下一步(N) >>” 弹出如图9所

示界面

感谢下载载

图9

单击“. . .” 添加数据源第一步所建Access数据库 如图10所示

图10

单击“测试连接T” 出现提示框如图11所示

图11

感谢下载载

之后点击“确定” 退回到如图12所示界面

图12

单击“记录源” 弹出如图13所示界面

图13

在“命令类型”下选择“1-adCmdText” 在“命令文本SQL”下输入“Select

*from test1” 最后单击“应用”  “确定”即可

之后进入程序书写部分

感谢下载载

程序部分需要注意接头形式及简单例子如下

Private Sub Command1_Cl ick()‘VB按钮控件

Dim mydbAs NewADODB.Connection‘定义新的数据库连接mydb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\read database\test1\test1.mdb"‘数据库绝对路径

Dim rsAs NewADODB.Recordset‘定义数据库的一个对象mydb.Open‘打开数据库rs.Open "select*from test1",mydb,3, 3‘打开数据库中的表test1

For i =1 To 1 ! For循环控制选择哪一行rs.M ove Next

Next i

Me.Text1.Text=rs.Fields(1).Value‘读取指定行中的哪个数据给文本框rs.Update‘数据显示rs.Close‘关闭表

EndSub

感谢下载载

欢迎您的下载资料仅供参考感谢下载载

2022年腾讯云新春采购季代金券提前领 领取满减优惠券和域名优惠

2022年春节假期陆续结束,根据惯例在春节之后各大云服务商会继续开始一年的促销活动。今年二月中旬会开启新春采购季的活动,我们已经看到腾讯云商家在春节期间已经有预告活动。当时已经看到有抢先优惠促销活动,目前我们企业和个人可以领取腾讯云代金券满减活动,以及企业用户可以领取域名优惠低至.COM域名1元。 直达链接 - 腾讯云新春采购活动抢先看活动时间:2022年1月20日至2022年2月15日我们可以在...

RackNerd 黑色星期五5款年付套餐

RackNerd 商家从2019年上线以来争议也是比较大的,一直低价促销很多网友都认为坚持时间不长可能会跑路。不过,目前看到RackNerd还是在坚持且这次黑五活动也有发布,且活动促销也是比较多的,不过对于我们用户来说选择这些低价服务商尽量的不要将长远项目放在上面,低价年付套餐服务商一般都是用来临时业务的。RackNerd商家这次发布黑五促销活动,一共有五款年付套餐,涉及到多个机房。最低年付的套餐...

Buyvm:VPS/块存储补货1Gbps不限流量/$2起/月

BuyVM测评,BuyVM怎么样?BuyVM好不好?BuyVM,2010年成立的国外老牌稳定商家,Frantech Solutions旗下,主要提供基于KVM的VPS服务器,数据中心有拉斯维加斯、纽约、卢森堡,付费可选强大的DDOS防护(月付3美金),特色是1Gbps不限流量,稳定商家,而且卢森堡不限版权。1G或以上内存可以安装Windows 2012 64bit,无需任何费用,所有型号包括免费的...

vb连接access数据库为你推荐
免费制作空间免费做QQ空间!!!怎么搞免费qq空间qq讨论组qq讨论组是什么?为什么我的好友都能看见我说话?天府热线为什么四川天府热线区经常进去不到啊??ghostxp3GHOST系统 ghostxp3 ghostxp2 ghostxp1 三者有什么区别?依赖注入什么是依赖注入依赖注入的作用是什么意思网站运营一般网站如何运营淘宝店推广如何推广淘宝店网店推广网站怎么免费推广淘宝店铺?网易公开课怎么下载哪位高手指导一下,如何下载网易公开课啊?奇虎论坛360有论坛中心?
什么是域名 免费域名注册网站 北京域名空间 三级域名网站 万网域名解析 ix主机 私人服务器 圣迭戈 unsplash patcha 最好看的qq空间 警告本网站美国保护 泉州电信 中国电信宽带测速器 免费邮件服务器 lick 智能dns解析 百度云空间 双线空间 godaddy空间 更多