vba數(shù)據(jù)庫編程答案

1、VBA數(shù)據(jù)庫編程技術實驗目的1、掌握connection對象2、掌握Recdset對象3、掌握Comm對象實驗題目91connection對象的具體連接方法：方法1DimconnAsADODB.Connection定義對象類型Setconn=NewADODB.Connection將對象初始化conn.ConnectionString=“Provider=Microsoft.Jet.OLEDB.4.0DataSource=E:access

2、vba數(shù)據(jù)庫編程技術學生成績管理.mdb“設置連接字符信息conn.open連接對象打開…………….conn.Close關閉連接對象Setconn=Nothing將連接對象清空方法2DimconnAsADODB.Connection定義對象類型Setconn=NewADODB.Connection將對象初始化conn.Open“Provider=Microsoft.Jet.OLEDB.4.0DataSource=E:accessvba數(shù)

3、據(jù)庫編程技術學生成績管理.mdbUID=PWD=“…………….conn.CloseSetconn=Nothing方法3DimconnAsADODB.Connection定義對象類型Setconn=NewADODB.Connection將對象初始化conn.OpenCurrentProject.Connection打開當前正在連接的數(shù)據(jù)…………….conn.CloseSetconn=Nothing92在91的基礎上，打開表單學生信息，利用

4、Recdset對象獲取來自“學生成績管理.mdb”中“學生”數(shù)據(jù)表的記錄，并顯示第一條記錄。95新建一個過程a將“專業(yè)”數(shù)據(jù)表中專業(yè)名稱為“公共基礎教學”的專業(yè)負責人姓名改為“鄭智強”。PublicSuba()DimconnAsADODB.Connection定義對象類型Setconn=NewADODB.Connection將對象初始化conn.OpenCurrentProject.Connection打開當前正在連接的數(shù)據(jù)Dimcom

5、mAsmSetcomm=Newmcomm.ActiveConnection=mText=“update專業(yè)set專業(yè)負責人=鄭智強where專業(yè)名稱=公共基礎教學“comm.ExecuteMsgBox“已完成修改“032“提示“conn.CloseSetconn=NothingSetcomm=NothingEndSub96打開“學生成績管理.mdb”，設計課程成績統(tǒng)計窗體，運行界面如圖95所示，要求實現(xiàn)：1、在組合框combo1中選擇一

6、課程編號，則對應的課程名稱、學分、任課教師、學時分別顯示在對應文本框中2、單擊“統(tǒng)計按鈕”，則在對應文本框中顯示指定課程的所有參考學生人數(shù)、課程平均分、60分以上人數(shù)和不及格人數(shù)。3、若未指定具體課程編號就單擊“統(tǒng)計”按鈕，則顯示提示信息。OptionCompareDatabasePrivateSubCombo0_Change()DimrsAsADODB.RecdsetSetrs=NewADODB.RecdsetDimsqlstrAsS