亚洲国产精品人久久,亚洲va国产日韩欧美精品色婷婷,久久久久88色偷偷,免费人成黄页在线观看国际

17站長網(wǎng)

17站長網(wǎng) 首頁 數(shù)據(jù)庫 Access 查看內(nèi)容

VB通過DAO訪問Access數(shù)據(jù)庫

2023-3-16 16:36| 查看: 1746 |來源: 互聯(lián)網(wǎng)

Visual Basic對Access數(shù)據(jù)庫的集成非常緊密,通常由以下幾個部分組成。引用DAO類型庫1、從“工程”菜單中選擇“引用”菜單項;2、在可引用列表框中選擇“Microsof ...

Visual Basic對Access數(shù)據(jù)庫的集成非常緊密,通常由以下幾個部分組成。

引用DAO類型庫

1、從“工程”菜單中選擇“引用”菜單項;

2、在可引用列表框中選擇“Microsoft DAO 3.51 Object Library”項。

3、最后“確定”即可

設(shè)置DAO數(shù)據(jù)類型變量

DAO數(shù)據(jù)類型變量共分成兩種:

1、Database變量

對應(yīng)于Access數(shù)據(jù)庫,通常在模塊中被定義為Public全程變量:

Public AccessDBF As Database

'定義數(shù)據(jù)庫對象實例AccessDBF

2、RecordSet變量

對應(yīng)于Access數(shù)據(jù)庫中的一個表,可定義為全程變量或局部變量,亦可作為函數(shù)參數(shù)進行傳遞:

Dim thePrintTable As RecordSet

'定義一個表對象實例thePrintTable

打開DAO數(shù)據(jù)類型

1、打開Access的方法

通常可設(shè)置一個專門的Public函數(shù)用來打開一個Access數(shù)據(jù)庫,并且該函數(shù)在啟動窗體的Private Sub Form_load ( )過程中被調(diào)用,函數(shù)定義格式如下:

Public Sub OpenDatabase ( )

Dim sConeect As String

SConnect = ";PWD = 8830428; UID = admin "

'設(shè)置打開時的用戶名、口令等參數(shù)

Set AccessDBF = Nothing

'確認關(guān)閉對象實例

Set AccessDBF = WorksPaces (0 ).OpenDatabase (App.Path&&"/ToXls.MDB",False,sConnect)

'打開當前路徑的ToXls.MDB數(shù)據(jù)庫

End Sub

2、打開RecordSet的方法

RecordSet遵循即用即開的原則,所以它通常在函數(shù)中打開

Set thePrintTable = AcessDBF.OpenRecordSet ( "Table_1",dbOpenSnapshot )

相關(guān)的數(shù)據(jù)操作

數(shù)據(jù)實際需要對Access表中的記錄、字段、數(shù)據(jù)項進行操作。下列雙重循環(huán)把數(shù)據(jù)輸出到Excel對應(yīng)的單元格中:

For j = 0 To 2

For I = 0 To 3

ThePrintTable.MoveNext

Excel.Sheet.Range ( Trim ( chr ( 71+j*10+I ) )+"G").Value = thePrintTable.Fields (0)

Next I

Next j

關(guān)閉數(shù)據(jù)庫

1、關(guān)閉Database

它通常在整個應(yīng)用程序的最后進行操作,即通常出現(xiàn)在Private Sub Form_unload (Cannel As Interger )過程中。命令格式實例如下:

AccessDBF.Close

2、關(guān)閉RecordSet

它遵循用完即關(guān)的原則,所以通常出現(xiàn)在函數(shù)中。當完成了相關(guān)的數(shù)據(jù)操作后就關(guān)閉它,下次再用時再打開即可:

thePrintTable.Close

結(jié)論:通過系統(tǒng)集成開發(fā)應(yīng)用程序的輸入和輸出模塊,它一方面充分利用了OLE對象程序的優(yōu)點,輕松完成人機界面設(shè)計,使程序員從繁瑣而又簡單的點、線、框等定位中脫離出來;另一方面,由于充分利用了用戶操作熟練的軟件作為人機界面,使用戶有親切感和熟練操作的能力,從而能夠充分發(fā)揮所開發(fā)的應(yīng)用程序的功能

本文最后更新于 2023-3-16 16:36,某些文章具有時效性,若有錯誤或已失效,請在網(wǎng)站留言或聯(lián)系站長:17tui@17tui.com
·END·
站長網(wǎng)微信號:w17tui,關(guān)注站長、創(chuàng)業(yè)、關(guān)注互聯(lián)網(wǎng)人 - 互聯(lián)網(wǎng)創(chuàng)業(yè)者營銷服務(wù)中心

免責聲明:本站部分文章和圖片均來自用戶投稿和網(wǎng)絡(luò)收集,旨在傳播知識,文章和圖片版權(quán)歸原作者及原出處所有,僅供學習與參考,請勿用于商業(yè)用途,如果損害了您的權(quán)利,請聯(lián)系我們及時修正或刪除。謝謝!

17站長網(wǎng)微信二維碼

始終以前瞻性的眼光聚焦站長、創(chuàng)業(yè)、互聯(lián)網(wǎng)等領(lǐng)域,為您提供最新最全的互聯(lián)網(wǎng)資訊,幫助站長轉(zhuǎn)型升級,為互聯(lián)網(wǎng)創(chuàng)業(yè)者提供更加優(yōu)質(zhì)的創(chuàng)業(yè)信息和品牌營銷服務(wù),與站長一起進步!讓互聯(lián)網(wǎng)創(chuàng)業(yè)者不再孤獨!

掃一掃,關(guān)注站長網(wǎng)微信

大家都在看

熱門排行

最近更新

返回頂部