数据库vb连接access数据库常用的方法两种示例-

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

这里以链接access数据库为例。

第一部分是通过语句链接第二部分是通过控件链接

一、

通过语句链接数据库然后把相应的数据赋值给某个文本框就行了。

1 .首先定义几个全局变量

Dim cn As New ADODB.Connection

Dim rs As New ADODB.Recordset

Dimconstr As String

2.给这些变量赋值方便链接数据库constr = "Provider=Microsoft .Jet .OLEDB.4.0; " &"Data Source=D:\EffectSolution\科学效应数据库.mdb"红色部分写你自己的数据库路径。

3.打开数据库cn.open constr

打开表rs .open “select * from效应表where id=5“  cn取字符串并赋值给相应的文本

Text1 . text=rs.f ields(“效应和现象名称”)

Text2. tex t=rs.f ie lds(“文字解说”)

关闭表rs .close

关闭数据库cn.close

注意最后两步骤一定要有不然下次打开数据库的时候会提示出错的这样的话在窗口上建立两个文本框就够了。

但是在此之前还有一步一定要做

点"工程"-"引用"-找到"Microsoft ActiveX Data Object 2.6

显示的结果如下图所示

通过与效应表对比发现显示正确。

总体代码如下

Private Sub Form_Load()

Dim cn As New ADODB.Connection

Dim rs As New ADODB.Recordset

Dim constr As Stringconstr = "Provider=Microsoft .Jet .OLEDB.4.0;" &_"Data Source=D:\EffectSolution\科学效应数据库.mdb"'空格加短下划线表示续行cn.open constrrs .open "select * from效应表where id =5" , cnText 1 .Tex t =r s .f i e ld s("效应和现象名称")

Text2.Text =r s .f ie lds("文字解说")rs .Close

cn.Close

End Sub

二、

通过ado控件链接数据库然后通过datagrid控件显示数据库中的相关表。

过程示例

1 .添加部件ado控件和datagrid控件如图所示

这样工具栏里面会出现这样两个图标最下面 

2.把这两个控件添加到你的form1里面这个不用演示吧

3.右击你添加的 adodc1控件  选最后一个

然后点General里面的Use Connection String里面的那个Build  选择microsoft JET 4.0 OLE DBProvider 选中之后点下一步

4.然后点击第一个项目右边那个很多点的按钮找到自己的数据库选好之后点“打开“

旁边的文本框里面就有了数据路径像这样

5.测试连接成功了就行了

CYUN(29元/月)美国、香港、台湾、日本、韩国CN2,续费原价

关于CYUN商家在之前有介绍过一次,CYUN是香港蓝米数据有限公司旗下的云计算服务品牌,和蓝米云、蓝米主机等同属该公司。商家主要是为个人开发者用户、中小型、大型企业用户提供一站式核心网络云端部署服务,促使用户云端部署化简为零,轻松快捷运用云计算。目前,CYUN主要运营美国、香港、台湾、日本、韩国CN2线路产品,包括云服务器、站群服务器和独立服务器等。这次看到CYUN夏季优惠活动发布了,依然是熟悉的...

无忧云:服务器100G高防云服务器,bgpBGP云,洛阳BGP云服务器2核2G仅38.4元/月起

无忧云怎么样?无忧云值不值得购买?无忧云,无忧云是一家成立于2017年的老牌商家旗下的服务器销售品牌,现由深圳市云上无忧网络科技有限公司运营,是正规持证IDC/ISP/IRCS商家,主要销售国内、中国香港、国外服务器产品,线路有腾讯云国外线路、自营香港CN2线路等,都是中国大陆直连线路,非常适合免备案建站业务需求和各种负载较高的项目,同时国内服务器也有多个BGP以及高防节点。目前,四川雅安机房,4...

spinservers:圣何塞物理机7.5折,$111/月,2*e5-2630Lv3/64G内存/2T SSD/10Gbps带宽

spinservers美国圣何塞机房的独立服务器补货120台,默认接入10Gbps带宽,给你超高配置,这价格目前来看好像真的是无敌手,而且可以做到下单后30分钟内交货,都是预先部署好了的。每一台机器用户都可以在后台自行安装、重装、重启、关机操作,无需人工参与! 官方网站:https://www.spinservers.com 比特币、信用卡、PayPal、支付宝、webmoney、Payssi...

vb连接access数据库为你推荐
易pc华硕易PC这款本本值不值的买勒?郭吉军什么叫做广告联盟硬盘人什么叫“软盘人”和“硬盘人”?怎么点亮qq空间图标如何点亮QQ空间图标机械键盘轴机械键盘的轴哪种好?服务器连接异常手机WIFI检查显示主服务器连接异常,怎么办微信电话本怎么用微信电话本如何使用?网站地图制作如何制作、提交网站地图南北互通从南方发往北方的产品一般是什么黑龙江计算机等级考试网计算机2级考试成绩怎么查?
未注册域名查询 天津服务器租赁 主机优惠码 域名商 国外idc edis 一点优惠网 web服务器的架设 东莞服务器 爱奇艺会员免费试用 无限流量 路由跟踪 cdn网站加速 hostease 博客域名 sonya 时间服务器 2016黑色星期五 ubuntu安装教程 德国代理ip 更多