1、第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，第9章VBA數(shù)據庫編程可以用它們網站數(shù)據庫數(shù)據庫， 第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，9.1 VBA常用操作方法一，開和關操作在VBA中，操作主要有：1.開放式形式Docmd.OpenForm形式： docmd.opmd where condition， datamode，windowmode殘奧計量器說明： formname :表示當前數(shù)據庫中表單的有效名稱的字符串表達式。 view:acdes

2、ign，asFormDS，acNormal，acPreviewfiltername :篩選查詢的有效名稱，主要篩選表單數(shù)據源數(shù)據，wherecondition :篩選字符串表達式。 不含Where關牛鼻子字的有效SQL Where子句數(shù)據模式： AC格式，acFormEdit，acFormReadOnly，acformpropertysettingswindowmode : 交流隱藏，交流acIcon，acWindowNormal， 第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套， 例如：以對話計程儀形式打開“注冊”表單docmd.open form AC dia

3、log2.開放式記錄通訊端口Docmd.OpenReport格式： Docmd.OpenReport reportname，view，filtername， wherecondition殘奧儀表說明： report表示當前數(shù)據庫中的通訊端口的有效名稱view:acviewdesign，acViewNormal， acViewPreviewfiltername :字符串表達式，表示當前數(shù)據庫中查詢的有效名稱wherecondition :字符串表達式第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套， 示例：“學生信息”通訊端口Docmd.Openreport預覽“學生

4、信息”并關閉acViwePreview 3.操作Docmd.Close格式save殘奧儀表說明： objiecttype :以下特定常量之一： acdataaccessse 交流診斷、交流表單、交流宏、交流模塊、交流查詢對象名稱：表示有效對象名稱的字符串表達式。 save :以下固有常數(shù)之一： acSaveNo、acSavePrompt、acSaveYes。 從Docmd.Close命令殘奧儀表可以看出，此命令可以廣泛用于關閉Access中的不同對象。 如果省略所有殘奧表命令(Docmd.Close )，則當前窗體將關閉。第9章VBA數(shù)據庫編程未來教育全國校訂機等級考試第2級Access教程-

5、定徑套，如關閉計程儀表格。 Docmd.Close acForm，“注冊”關閉“注冊”報告通訊端口。 Docmd.Close acReport，“注冊”，第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，二、輸入框主要提示用戶輸入文本。 在VBA中作為函數(shù)調用。 格式： inputbox (提示、標題、默認、xpos、ypos、幫助)參數(shù)說明： prompt :提示字符串。 title :顯示對話計程儀框標題欄中的字符串表達式。 default :在字符框中顯示字符串表達式。 xpos :指定從對話計程儀框左側到屏幕左側的水平距離。 ypos :指定距離對話計程儀上

6、畫面的垂直距離。 幫助：為對話計程儀提供上下文的幫助。 context :某主題的幫助上下文編號，第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，注意：輸入區(qū)的差動奧爾特值有$數(shù)字類型。 否則是數(shù)值類型。 提示如果需要換行，請用Chr(13) Chr(10 )分隔每行。上圖顯示了inputbox的示例。 調用語句為strName=InputBox (鍵入名稱Chr(13) Chr(10 )，然后喀嚦聲定“確定”。 輸入框，王曉明，100，100 )。 格式： msgbox (提示，推特，標題， help )殘奧儀表說明： prompt :提示字符串title :顯

7、示對話框標題欄的字符串表達式buttons :顯示按鈕的數(shù)量和格式， 圖標樣式等helpfile :在對話計程儀框中提供上下文幫助context :某個主題的幫助上下文編號示例： MsgBox“請輸入學生名稱”、vbInformation、“學生信息”、 第九章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程其含義是： Buttons選項取值說明，第九章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，表格上顯示(cmd顯示)，測試(測試) 上通告過程的功能是，喀嚦聲“測試”按鈕顯示信息框，喀嚦聲信息框的“確定”按鈕時隱藏表單的“顯示”按鈕，喀嚦聲信息框的“

8、取消”按鈕時關閉表單。 privatesubcmdtest _ click () answer=_ _ _ _ _ _ _ _ _ (隱藏按鈕，vbokcancel ) if answer=v book msgbox，F(xiàn)alse，第9章VBA數(shù)據庫編程未來教育全國訂算機等級考試二級Access教程-定徑套、 4 .使用VBA計程儀編程數(shù)據驗證表格和數(shù)據網站數(shù)據庫頁，在每次保存記錄數(shù)據時將更改保存在數(shù)據源表中。 “BeforeUpdate”上通告發(fā)生在修改特羅爾中的數(shù)據或更新記錄的數(shù)據之前。 您可以為表單或組合特羅爾創(chuàng)建BeforeUpdate上通告過程，以驗證填充到窗體控件中的各種數(shù)據。 例如

9、，數(shù)據類型驗證、數(shù)據范圍驗證等。 注意：組合特羅爾BeforeUpdate上通告過程是殘奧儀表過程。 您可以通過設置殘奧儀表取消來確定是否發(fā)生BeforeUpdate上通告。 如果取消殘奧儀表設置為True，則取消固件更新上通告。 此外，VBA還提供了相關函數(shù)，用于在驗證特羅爾錄入數(shù)據時鼎力相助驗證。 第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套、常用驗證函數(shù)，第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套， 5 .在VBA中設置整個窗口的“計數(shù)器間隔TimerInterval”屬性和添加的處理在Timer上通告每隔一個TimerI

10、nterval時間間隔發(fā)生，并且通過執(zhí)行Timer上通告過程來作出響應。 第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-合作，9.2 VBA的數(shù)據庫編程VBA使用數(shù)據庫引擎工具完成與數(shù)據庫的網站數(shù)據庫， 數(shù)據庫引擎實際上是一組動態(tài)鏈接庫(DLL )，VBA計程儀1.VBA在執(zhí)行plum時提供了三種類型的數(shù)據庫網站數(shù)據庫接口： ODBC API :開放數(shù)據庫互聯(lián)互通應用程序計程儀編程接口。 DAO :數(shù)據網站數(shù)據庫對象。 ADO:Active數(shù)據對象2.VBA所網站數(shù)據庫的3種數(shù)據庫類型：本地數(shù)據庫： ACCESS外部數(shù)據庫ODBC數(shù)據庫： Oracle、SyBase、S

11、QL Server等， 第9章VBA數(shù)據庫編程未來教育全國補正機等級考試二級ACCESS教程-，DBEngine數(shù)據庫引擎是DAO模型的頂級對象，包括其他對象進行管理。 第9章VBA數(shù)據庫編程未來教育全國補正機等級考試二級Access教程-定徑套，4 .指定ADO對象ADO數(shù)據對象模型、數(shù)據連接提供者，建立與數(shù)據源的連接。 可以通過喀嚦聲來執(zhí)行命令，如執(zhí)行SQL查詢。 一般用于修改表格結構。 可以執(zhí)行SQL查詢并返回查詢密碼定徑套，然后修改、插入和刪除查詢密碼定徑套。是ADO中最靈活的對象。 第9章VBA數(shù)據庫編程未來教育全國計算機等級考試二級Access教程-定徑套，如分別用DAO和ADO完

12、成“教育管理. mdb”文件中“學生表”學生年齡加1的操作。 使用DAO技術： Sub SetAgePlus1() (假設文件存儲在電子磁盤的“測試中心教程”文件夾中) dim ws as DAO.Workspace工作區(qū)對象dim db as DAO.Database數(shù)據庫對象dim rs as DAO.Recordset查詢密碼定定徑套對象dim fd as DAO.Field字段對象seld . woord set db=ws.open數(shù)據庫(“e 3360考試中心教學管理. mdb”)數(shù)據庫set rs=db.OpenRecordSet (“學生表”) 打開“學生表”第9章VBA數(shù)據庫

13、編程未來教育全國計算機等級考試二級Access教程-定徑套，Do while not rs.eof記錄收集用循環(huán)結構掃描rs.edit設定“編輯”狀態(tài)fd=fd 1年齡字段值1 rs.update更新記錄， 保存年齡值rs.movenext記錄指針向下一個looprs.closeoff、回收對象變量db.closesetrs=nothingoff和回收對象變量set db=Nothing End sub移動， 第9章VBA數(shù)據庫編程未來教育全國補正機等級考試使用二級Access ADO技術： Sub SetAgePlus1() dim cn as New ADODB.Connection連接對

14、象dim rs as New ADODB.RecordSet查詢密碼定定徑套對象dim fs as adodb .字段對象dim strSQ連接as字符串連接字符串dim L as String查詢字符串strconnect=(“e:考試題教育管理. mdb”)連接數(shù)據庫vider=“Microsoft.jet.oledb.4.0”的設定數(shù)據提供器cn.open strconnect， 連接到數(shù)據源打開strsql=“選擇年齡自學生表”adOpenDynamic、adLockOptimistic、adCmdText set fd=rs.Fields (“年齡”)， 第9章VBA數(shù)據

15、庫編程未來教育全國計算機等級考試二級Access教程-掃描定徑套查詢密碼定徑套用環(huán)路結構Do while not rs.eof fd=fd 1年齡字段值加上1 rs.update更新查詢密碼， 保存年齡值rs.movenext記錄指針移動到下一個loopoff，回收對象變量RS.close db.close setrs=nothing set db=nothingend sub， 第9章VBA數(shù)據庫編程未來教育全國補正機等級考試二級Access教程ADO數(shù)據對象模型的關聯(lián)要點(1) recordset recordset查詢密碼定徑套對象如何移動查詢密碼指針： MoveFirst將查詢密碼指針

16、移動到第一個查詢密碼MoveNext查詢密碼指針將當前記錄查詢密碼的下一個查詢密碼MovePrevious記錄指針移動到當前記錄的上一個記錄MoveLast記錄指針要移動的recordset recordset查詢密碼定徑套的BOF和EOF屬性用于確定查詢密碼指針是否位于報告查詢密碼所在的正常位置，并且該查詢密碼指針是否指向最后一個報告查詢密碼，其中，在EOF屬性為true recordset查詢密碼指針指向第一個報告之前， BOF屬性為True BOF和EOF屬性的值為True，查詢密碼定徑套為空第9章VBA數(shù)據庫編程未來教育全國補正機等級考試二級Access教程-定徑套，5 .一些特殊函數(shù)(1)Nz函數(shù)： Nz函數(shù)：將Null值轉換為0，空字符串，指定值格式： N