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

上传人:b****7 文档编号:8890718 上传时间:2023-02-02 格式:DOCX 页数:8 大小:962.48KB
下载 相关 举报
vb连接access数据库常用的方法两种示例.docx_第1页
第1页 / 共8页
vb连接access数据库常用的方法两种示例.docx_第2页
第2页 / 共8页
vb连接access数据库常用的方法两种示例.docx_第3页
第3页 / 共8页
vb连接access数据库常用的方法两种示例.docx_第4页
第4页 / 共8页
vb连接access数据库常用的方法两种示例.docx_第5页
第5页 / 共8页
点击查看更多>>
下载资源
资源描述

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

《vb连接access数据库常用的方法两种示例.docx》由会员分享,可在线阅读,更多相关《vb连接access数据库常用的方法两种示例.docx(8页珍藏版)》请在冰豆网上搜索。

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

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

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

第一部分是通过语句链接,第二部分是通过控件链接通过语句链接数据库,然后把相应的数据赋值给某个文本框就行了。

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

DimcnAsNewADODB.Connection

DimrsAsNewADODB.Recordset

DimconstrAsString

2.给这些变量赋值,方便链接数据库

"Data

constr="Provider=Microsoft.Jet.OLEDB.4.0;"&Source=科学效应数据库.mdb"

红色部分写你自己的数据库路径。

3.打开数据库

cn.openconstr

打开表

rs.open“select*from效应表whereid=5“,cn取字符串并赋值给相应的文本

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

Text2.text=rs.fields(文字解说“”)

关闭表

rs.close

关闭数据库

cn.close

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

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

点"工程"-"引用"-找到"MicrosoftActiveXDataObject

2.6",如图所示:

Lnx|

.[□加■

匚^IX

运行砂宣询咲)ItRd)IRd)弊虫)■口加«Jihjl

时t?

占習*:

N£1flu,*i]n

;"抵葩i”整jus.bujji

T#r»

Op

[}

CtrliH

枷険仁crd

i(ei辿图电:

工堤②格弍口调法妙国空诲口E^q)工貝⑴外罢枉序⑴®n帮iftcoI討唔"屯1?

決煽仙行匚町

cn.openconstr

rs.open^select*fron效应農whatraid=6*tTaxtl.Tait=r吕.F让ld・("效应和现象据称")T«tXTert■rs.fields宇轉说"}

却i;Fiu.iw

氈件功.

Dirtt;1j1

N—3SAlWffv

口動mi齢旺)

恳启嗣t:

护冲為扭曲少|匚|习辰砂户曲01

%盘呃」寸塑.刖V-U1«»■SRAU13a.lv启JoimreL?

bc*君丽帖“ErvLTflfffl*Dlt卫爭Ml"』阳序tlJ..爾皿瓷皆卽..CuliD

^cardawt

DimcanstrAsString

consLr=^PrQvi^er^icrosoft.Jet-OLEDB-4-0:

"_

*D&taSquce=J:

'■.Effect&olution■,科学我应魏夷荤cndb"

Fan

Option5\p-i;;;

Ptivs*eSuhFqfit

DlhicnAs

DljursAsXew

DErrccn"trArStringcorstr-^Provider^M*DataSource=D:

\Effe

cn.openconetrrci.oper°ek?

1枣c:

Tentl.Trxt-rs.r^Kt2.1ext=rs.

引艸-za【

*fromJfc应表whereid-5">fields和臥象名称")

field.文字解说:

显示的结果如下图所示:

 

IW

曝炸指一个化学反应能不断地自我加速而在瞬间完成,并伴随有光的发射寰系统温度顺势达到极大值和气体的压力急骤变化段以致形成冲击波等现象二爆炸可通过化学反宦、放电、激光束效应、核反应等方法获得口

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

总体代码如下:

PrivateSubForm_Load()

DimcnAsNewADODB.Connection

DimrsAsNewADODB.Recordset

DimconstrAsString

constr="Provider二Microsoft.Jet.OLEDB.4.0;"&_

科学效应数据库.mdb"

'空格加短下划线表示续行

cn.openconstr

rs.open"select*from效应表whereid=5",cn

Textl.Text=rs.fields("效应和现象名称")

Text2.Text=rs.fields("文字解说")

rs.Closecn.Close

EndSub

通过ado控件链接数据库,然后通过datagrid控件显示数据

库中的相关表。

过程示例:

这样工具栏里面会出现这样两个图标(最下面)

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

3.右击你添加的adodc1控件,选最后

Build,选择microsoftJET4.0OLEDBProvider,选

中之后点下一步;

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

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

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

6.点确定,显示这样一个界面:

7.点右边第三个RecordSource按钮,设置成如下情况

cmdtext选择1,然后输入SQL语句,

Select*from效应表(表名,必填)

8.设置好之后点确定就行了,这样就通过adodcl控件连接到

了数据库中的这张表接下来是对datagrid控件的设置:

9.

把datagridl控件的datasource设置成adodcl,就行了。

10.按F5启动,就会显示这样一个结果:

IQ>

Ik360廠關世

丈件叩观伍tv:

Tirai權式n耐「运疔血春询orras?

d)t早di那蒔帶too克口⑹利型印

F工锂iCT程i)

I-害1

鬥FrrnlUrfiyirl

屯1诞许洁购略拿书用

穆轩神

frl*RicFM^f.I

-Nicrc<

昭Fr>rr1

这样就成功了。

 

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 工程科技 > 环境科学食品科学

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1