vb連接access大數(shù)據(jù)庫(kù)常用地方法兩種示例

1、實(shí)用文檔這里以鏈接access數(shù)據(jù)庫(kù)為例.第一局部是通過語句鏈接,第二局部是通過控件鏈接通過語句鏈接數(shù)據(jù)庫(kù),然后把相應(yīng)的數(shù)據(jù)賦值給莫個(gè)文本框就行了.1 .首先定義幾個(gè)全局變量Dim cn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim constr As String2 .給這些變量賦值,方便鏈接數(shù)據(jù)庫(kù)constr = "Provider=Microsoft.Jet.OLEDB.4.0;" & "DataSource=科學(xué)效應(yīng)數(shù)據(jù)庫(kù).mdb紅色局部寫你自己的數(shù)據(jù)庫(kù)路徑.3 .翻開數(shù)據(jù)庫(kù)cn.o

2、pen constr翻開表rs.open “select * from 效應(yīng)表 where id=5 cn取字符串并賦值給相應(yīng)的文本Text1.text=rs.fields效應(yīng)和現(xiàn)'象名稱Text2.text=rs.fields文字解說關(guān)閉表rs.close關(guān)閉數(shù)據(jù)庫(kù)cn.close注意,最后兩步驟一定要有,不然下次翻開數(shù)據(jù)庫(kù)的時(shí)候會(huì) 提示由錯(cuò)的,這樣的話,在窗口上建立兩個(gè)文本框就夠了.但是,在此之前還有一步一定要做,文案大全實(shí)用文檔點(diǎn)"工程"-"引用"-找到"Microsoft ActiveX Data Object2.6 "

3、;,如下圖:Kcrnanff ¥i Tiani c 謖計(jì)W 0 色耐唱你如Si港加vm慟體口序工科周海力哦境始 思忝力啖攜山口 筋添Jinffl尸拄 酉市力訴的更E匚X海力學(xué) 而加 添加 褥加 添加更多H尸乂片山 hbCl.N Mi0 &中蚓t DHTHL P純修 DaIi EhvirdErt4Til ctimE 建訶4曲).*LaadOr讖 FurM (E)0部怦通J.Ctrl+Tan. open constr"select * from 效應(yīng)表 where idrSr openText L TextText2. Text =II回0可用的利用®Aeti

4、vftNuvi e C«nUrcliSfli£Lli-dir>fc2 7Option ExplicitQbjstE 刖Gbdat 2Private Sub Form LoadDim cn As New引用電Dnnect io:引用MtivS口b i電ctgLibraryADODB. C( ala口 WObjects 口bjstfLibr iry Library LibraryLibraryLibraryAftivaXActivel ActiTilActivelAetivelAetavelActiveX口蚊皮 Data Dal aMierftSift Mier gall

5、 Mier.44 ft Mierosaift MicrosoftObjects Objects Objects Objects幽囪科智密口圖行6,列310 1s總電 穌s本力值件5. Ctrl+JPr w電DiDi Xl£ Bag) .cordsetDim constr As Stringconstr = Provider-Microsoftu Jet. OLEDB- 4. 0;也 _"Data SesuroD: EffcctS口luticTL、科學(xué)效應(yīng)數(shù)據(jù)庫(kù).mdb"rs fields/效應(yīng)和現(xiàn)期忘稱D rs.文字解說"hi視圖5 工程g 格式

6、9; 調(diào)成 運(yùn)行® 查詢®圖費(fèi)工工且 外揩程序宜口 幫助皿Micrcuscfft Mj crcns：»ft Micros：毋 MicrQEO'ftMicorckEaf t Micarasitft Ml E-4Hm書 +Dim rs As Xew ADODB. R Dim constr As Stringconstr"Provider=Mi“Dsrta Source=D: Effeecn. open constrrs. openTextl. TextText2. Text期hln即terJlDO £xl. £. 6 for DD

7、L Sacurit-APC 6. 0 Obj b>ct LibraryAutoil scbv&ry Typ* Libr-ary HW r 1ST WellIi4r«s«ft ActiveX D&ta Objects 2. fi LiMaty定位 C ： Pr ograii ?Ll«CctTiTion FiIae sys-t dn ia.iiQ m stlb語言：爵徒select * from 效應(yīng)表 where id =5", cnrs. fields"效應(yīng)和現(xiàn)象名稱" rs. field?文字舞說顯示的結(jié)果如以

8、下圖所示:文案大全實(shí)用文檔爆炸爆炸指一個(gè)化學(xué)反響能不斷地自 我加速而在瞬間完成,并伴隨有光 的發(fā)射,系統(tǒng)溫度順勢(shì)到達(dá)極大值 和氣體的壓力急驟變化,以致形成 沖擊波等現(xiàn)象爆炸可通過化學(xué)反 應(yīng)、放電、激光束效應(yīng)、核反響等 方法獲得.通過與效應(yīng)表比照發(fā)現(xiàn)顯示正確.總體代碼如下：Private Sub Form_LoadDim cn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim constr As Stringconstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ 科

9、學(xué)效應(yīng)數(shù)據(jù)庫(kù),mdb"'空格加短下劃線表示續(xù)行cn.open constrrs.open "select * from 效應(yīng)表 where id =5", cnTextl.Text = rs.fields"效應(yīng)和現(xiàn)象名稱"Text2.Text = rs.fields"文字解說"文案大全實(shí)用文檔rs.Close cn.CloseEnd Sub二、通過ado控件鏈接數(shù)據(jù)庫(kù),然后通過 datagrid控件顯示數(shù)據(jù) 庫(kù)中的相關(guān)表.過程例如:1.添加部件ado控件和datagrid控件,如下圖:文件/ 褊輯® 視圖.

10、工程9 格式陋 調(diào)試 運(yùn)行如 互詢 圖莪U 工具 外接程序兇 超口世E瞿IIUL1 匚 面圖 a . * q 片訃|門卜H 同富利芍犬自a t： o. o |0 p附文案大全實(shí)用文檔這樣工具欄里面會(huì)由現(xiàn)這樣兩個(gè)圖標(biāo)最下面 UIQI1E0 62.把這兩個(gè)控件添加到你的forml里面,這個(gè)不用演示吧3.右擊你添加的 adodcl選最后9工程1巨S3國(guó)也l labi Ftira.1Adodcl idodc 蜃竽耳序短 送于 倨椒 目定 切.匕第I 4f>p4U:'-lTiC* BkckC4lor BQTAciirai 匚鼎th咫i.":*¥! uidT inao 二

11、 m Mi'ST'TE't Connect I orSt C!=-3uiveLhT i 2ij-£i>rL6Ckti CijcrsDrlyp* Dr “I 噌 m.Tircj*ctl - Nitzro.然后點(diǎn)General里面的 Use Connection String里面的那個(gè)Build , 選擇 microsoftJET 4.0OLEDB Provider,選中之后點(diǎn)下文案大全實(shí)用文檔提供程序：連接高級(jí)I所有選擇您希望連接的數(shù)據(jù)：OLE DB提供程序斯haCatalogBB OLE DE ProviderMediaCat&logFleirg

12、e dDB OLE DB Frovi derMcdi 4 也七社.對(duì)白bDE OLE DB Frcvi derMicrcsoft Jet 3. 51 OLZ DB Pt0VpiHerMi crosoft Jet 4. 0 OLE DB Provi derMiOffi ±e 12. 0 Access Dat4bas« Enain 目 QL£ DB FjMi crcs&ftCL2DB Frcvi derFerData Mining StrvicesMi eroxoftOLEDB Provi dmrfor工nd色xiikg Servi c&Mi cros

13、aftOLEDB Provi derforInternet PublishingMicrosoftOLEDB Frovi derODBC DHvftrxMicrosoftOLEDE ProviderfcrLAP Services 8. 0Mi crosoftOLEDE frcvi derforOracleMi crosoftOLEDB Frovi derforRSSearchIHi crosoftOLEDB FrwiderfcrEQL Sery4rMi erosoftOLEDB Simple Frovi der下一步Q!) » I確定取消 幫助 4 .然后,點(diǎn)擊第一個(gè)工程右邊那個(gè)很多

14、點(diǎn)的按鈕,找到自己 的數(shù)據(jù)庫(kù),選好之后點(diǎn) 翻開“文案大全實(shí)用文檔提供程序連接高箕所有指定以下設(shè)置以連接到以m 數(shù)據(jù)1.選擇或銅人數(shù)據(jù)庫(kù)名稱也)；Access數(shù)據(jù)庫(kù)亶找范圍 9： | EfftclSoluiion我最盛襠jEffactBaSej：",Effgctlmage 臼科學(xué)效應(yīng)數(shù)據(jù)庫(kù)G加桌面我的電腦g網(wǎng)上磁文件名也一科學(xué)效應(yīng)數(shù)據(jù)庫(kù)一 m油翻開CQ)旁邊的文本框里面就有了數(shù)據(jù)路徑,像這樣:5 .測(cè)試連接,成功了就行了文案大全實(shí)用文檔6.點(diǎn)確定,顯示這樣一個(gè)界面:7 .點(diǎn)右邊第三個(gè) RecordSource按鈕,設(shè)置成如下情況cmdtext選擇1,然后輸入 SQL語句,Select

15、* from 效應(yīng)表表名,必填文案大全實(shí)用文檔8 .設(shè)置好之后點(diǎn)確定就行了,這樣就通過adodcl控件連接到了數(shù)據(jù)庫(kù)中的這張表接下來是對(duì)datagrid控件的設(shè)置:9 .把 datagridl 控件的 datasource設(shè)置成 adodcl,就行了.F«l»A.ikLlciwlTf ddt tIf Ui知pc世 tits1 -,眥制加“wStyl* 4HHM0000541 如虛安iiH.白ptie或Causes Vali 13 dtL GEL IruiTirp«eDst rflcnter!z_DfiftolfrLdth|底癡EirtcLctm,值加青Dr-LeHodlt0 -40111141EniJb-lcJ1Faat.末瘁FortColbi' 4HEOCO3£e4V文案大全實(shí)用文檔10.按F5啟動(dòng),就會(huì)顯示這樣一個(gè)結(jié)果:M回兇,bi 印 o12155 i BB4D:衛(wèi) For*LI皂g 度工程i CtSi)-I百窗住Q Fornl OornlJd放阿和現(xiàn)算名新srEl臏正介十客外二2E2安培力它國(guó)刑場(chǎng)禰3E3匹克帝森處應(yīng)年,巴克4國(guó)包主揩過應(yīng)包定格姓