第一篇：ACCESS上機(jī)試題及答案3

一、基本操作

（1）在考生文件夾下，“samp1.mdb”數(shù)據(jù)庫(kù)文件中建立表“tTeacher”，表結(jié)構(gòu)如下。

（2）根據(jù)“tTeacher”表的結(jié)構(gòu)，判斷并設(shè)置主鍵。（3）設(shè)置“工作時(shí)間”字段的有效性規(guī)則為只能輸入上一年度五月一日以前（含）的日期（規(guī)定：本年度年號(hào)必須用函數(shù)獲取）。（4）將“在職否”字段的默認(rèn)值設(shè)置為真值，設(shè)置“郵箱密碼”字段的輸入掩碼為將輸入的密碼顯示為6位星號(hào)（密碼），設(shè)置“聯(lián)系電話”字段的輸入掩碼，要求前四位為“010-”，后八位為數(shù)字。（5）將“性別”字段值的輸入設(shè)置為“男”、“女”列表選擇。（6）在“tTeacher”表中輸入以下2條記錄：

第1題分析

本題主要考核點(diǎn)：在一個(gè)數(shù)據(jù)庫(kù)中添加一個(gè)新表、表結(jié)構(gòu)的定義、主鍵的設(shè)置、有效性規(guī)則的設(shè)置、默認(rèn)值的設(shè)置、輸入掩碼的設(shè)置、查閱向?qū)У氖褂靡约跋虮碇休斎胗涗洝?/p>

本題解題思路：

第一步：打開考生文件夾下的“samp1.mdb”數(shù)據(jù)庫(kù)。

第二步：打開數(shù)據(jù)庫(kù)菜單選擇“新建(N)”，在彈出的“新建表”對(duì)話框中，點(diǎn)擊“設(shè)計(jì)視圖”按鈕，在彈出的表設(shè)計(jì)器中按題面要求依次輸入各字段的定義。

第三步：主關(guān)鍵字是每個(gè)表中能惟一標(biāo)識(shí)每條記錄的字段，可以是一個(gè)字段，或是一組字段。由表中字段可知，“編號(hào)”為該表的主關(guān)鍵字，選中“編號(hào)”字段行，點(diǎn)擊工具欄上的“主鍵”按鈕。

第四步：選中“工作時(shí)間”字段行，再選中下面的“有效性規(guī)則”，在右邊的框中直接輸入“<=DateSerial(Year(Date())-1,5,1)”。

第五步：選中“在職否”字段行，在“默認(rèn)值”右邊的框中輸入“True”。選中“郵箱密碼”字段行，再選中下面的“輸入掩碼”，點(diǎn)擊右邊的“...”按鈕，在彈出的“輸入掩碼”向?qū)е羞x擇“密碼”，單擊“下一步”按鈕，再單擊“完成”按鈕。選中“聯(lián)系電話”字段行，再選中下面的“輸入掩碼”，輸入：“010-”00000000。

第六步：選中“性別”字段，在下面的“查閱”選項(xiàng)卡中的“顯示控件”選擇“列表框”，“行來(lái)源類型”中選擇“值列表”，“行來(lái)源”中輸入：男;女。然后以“tTeacher”保存該表。

第七步：向“tTeacher”表中輸入題面所要求的各字段的內(nèi)容。

二、簡(jiǎn)單應(yīng)用

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.mdb”，里面已經(jīng)設(shè)計(jì)好三個(gè)關(guān)聯(lián)表對(duì)象“tStud”、“tCourse”、“tScore”和一個(gè)空表“tTemp”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找并顯示有書法或繪畫愛好學(xué)生的“學(xué)號(hào)”、“姓名”、“性別”和“年齡”四個(gè)字段內(nèi)容，所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，查找成績(jī)低于所有課程總平均分的學(xué)生信息，并顯示“姓名”、“課程名”和“成績(jī)”三個(gè)字段內(nèi)容，所建查詢命名為“qT2”。（3）以表對(duì)象“tScore”和“tCourse”為基礎(chǔ)，創(chuàng)建一個(gè)交叉表查詢。要求：選擇學(xué)生的“學(xué)號(hào)”為行標(biāo)題、“課程號(hào)”為列標(biāo)題來(lái)統(tǒng)計(jì)輸出學(xué)分小于3分的學(xué)生平均成績(jī)，所建查詢命名為“qT3”。注意：交叉表查詢不做各行小計(jì)。

（4）創(chuàng)建追加查詢，將表對(duì)象“tStud”中“學(xué)號(hào)”、“姓名”、“性別”和“年齡”四個(gè)字段內(nèi)容追加到目標(biāo)表“tTemp”的對(duì)應(yīng)字段內(nèi)，所建查詢命名為“qT4”。（規(guī)定：“姓名”字段的第一個(gè)字符為姓，剩余字符為名。將姓名分解為姓和名兩部分，分別追加到目標(biāo)表的“姓”、“名”兩個(gè)字段中。）

第2題分析

本題主要考的是數(shù)據(jù)庫(kù)的查詢。

本題解題思路：

（1）點(diǎn)擊“查詢”，選擇“新建(N)”，在彈出的“新建查詢”窗體上選擇“設(shè)計(jì)視圖”，點(diǎn)擊“確定”按鈕，然后在彈出的“顯示表”窗體上選擇“tStud”表，點(diǎn)擊“添加”按鈕，關(guān)閉“顯示表”窗體。然后從“tStud”表中選擇“學(xué)號(hào)”、“姓名”、“性別”和“年齡”字段，并選擇“簡(jiǎn)歷”字段，把該字段的顯示中的鉤去掉，然后在“簡(jiǎn)歷”字段的“條件”中輸入：Like “*書法*” Or Like “*繪畫*”，以“qT1”保存查詢。

（2）選擇“新建(N)”，在彈出的“新建查詢”窗體上選擇“設(shè)計(jì)視圖”，點(diǎn)擊“確定”按鈕，然后在彈出的“顯示表”窗體上分別選擇“tStud”、“tCourse”和“tScore”表，點(diǎn)擊“添加”按鈕，關(guān)閉“顯示表”窗體。選擇題目中所說的三個(gè)字段，在“成績(jī)”字段的“條件”中輸入：<(select avg(成績(jī))from tScore)，最后以“qT2”保存查詢。

（3）選擇“新建(N)”，在彈出的“新建查詢”窗體上選擇“設(shè)計(jì)視圖”，點(diǎn)擊“確定”按鈕，然后在彈出的“顯示表”窗體上分別選擇“tScore”和“tCourse”表，點(diǎn)擊“添加”按鈕，關(guān)閉“顯示表”窗體。然后點(diǎn)擊“查詢”菜單中的“交叉表查詢”菜單（或點(diǎn)擊右鍵，選擇查詢類型中的“交叉表查詢”）。在字段中選擇“學(xué)號(hào)”，“交叉表”中選擇“行標(biāo)題”；選擇“課程號(hào)”字段，在“交叉表”中選擇“列標(biāo)題”；選擇“成績(jī)”字段，“交叉表”中選擇“值”，并在“總計(jì)”中選擇“平均值”；再選擇“學(xué)分”字段，并在條件中輸入：<3，“總計(jì)”中選擇“條件”；最后以“qT3”保存查詢。

（4）選擇“新建(N)”，在彈出的“新建查詢”窗體上選擇“設(shè)計(jì)視圖”，點(diǎn)擊“確定”按鈕，然后在彈出的“顯示表”窗體上選擇“tStud”表，點(diǎn)擊“添加”按鈕，關(guān)閉“顯示表”窗體。選擇“查詢”菜單中的“追加查詢”菜單（或者右擊鼠標(biāo)，在彈出的菜單中選擇“追加查詢”），追加到當(dāng)前數(shù)據(jù)庫(kù)中的“tTemp”表中，點(diǎn)擊“確定”。然后從“tStud”選擇“學(xué)號(hào)”字段，再在“字段”行的第二個(gè)空格處輸入“Left(([姓名]),1)”，第三個(gè)空格處輸入“Right([姓名],Len([姓名])-1)”，再?gòu)摹皌Stud”選擇“性別”和“年齡”字段，追加到“tTemp”表對(duì)應(yīng)的字段中，最后以“qT4”保存查詢。

三、綜合操作

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.mdb”，里面已經(jīng)設(shè)計(jì)了表對(duì)象“tEmp”、窗體對(duì)象“fEmp”、宏對(duì)象“mEmp”和報(bào)表對(duì)象“rEmp”。同時(shí)，給出窗體對(duì)象“fEmp”的“加載”事件和“預(yù)覽”及“打印”兩個(gè)命令按鈕的單擊事件代碼，試按以下功能要求補(bǔ)充設(shè)計(jì)：（1）將窗體“fEmp”上標(biāo)簽“bTitle”以特殊效果：陰影顯示。

（2）已知窗體“fEmp”的三個(gè)命令按鈕中，按鈕“bt1” 和“bt3”的大小一致、且左對(duì)齊?，F(xiàn)要求在不更改“bt1” 和“bt3”大小位置的基礎(chǔ)上，調(diào)整按鈕“bt2”的大小和位置，使其大小與“bt1”和“bt3”相同，水平方向左對(duì)齊“bt1” 和“bt3”，豎直方向在“bt1” 和“bt3”之間的位置。

（3）在窗體“fEmp”的“加載”事件中設(shè)置標(biāo)簽“bTitle”以紅色文本顯示；單擊“預(yù)覽”按鈕（名為“bt1”）或“打印”按鈕（名為“bt2”），事件過程傳遞參數(shù)調(diào)用同一個(gè)用戶自定義代碼（mdPnt）過程，實(shí)現(xiàn)報(bào)表預(yù)覽或打印輸出；單擊“退出”按鈕（名為“bt3”），調(diào)用設(shè)計(jì)好的宏“mEmp”來(lái)關(guān)閉窗體。

（4）將報(bào)表對(duì)象“rEmp”的記錄源屬性設(shè)置為表對(duì)象“tEmp”。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tEmp”和宏對(duì)象“mEmp”；不允許修改窗體對(duì)象“fEmp”和報(bào)表對(duì)象“rEmp”中未涉及的控件和屬性。程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存在的語(yǔ)句。

第3題分析

本題主要考的是窗體的設(shè)計(jì)。

本題解題思路如下：

（1）打開窗體對(duì)象“fEmp”的設(shè)計(jì)視圖，選擇“bTitle”標(biāo)簽控件，并點(diǎn)擊工具欄上的“屬性”按鈕，特殊效果屬性設(shè)置為“陰影”。

（2）打開窗體“fEmp”的設(shè)計(jì)視圖，選中“bt2”按鈕，并點(diǎn)擊工具欄上的“屬性”按鈕，將命令按鈕bt2的“左邊距”設(shè)置為3厘米，“上邊距”設(shè)置為2.5厘米，“寬度”設(shè)置為3厘米，“高度”設(shè)置為1厘米。

（3）打開窗體“fEmp”的設(shè)計(jì)視圖，并點(diǎn)擊工具欄上的“屬性”按鈕，點(diǎn)擊“加載”屬性右邊的“…”打開代碼生成器，在“*****Add1*****”與“*****Add1*****”之間輸入“bTitle.ForeColor = 255”，保存窗體。

（4）打開窗體“fEmp”的設(shè)計(jì)視圖，選中“bt1”按鈕，并點(diǎn)擊工具欄上的“屬性”按鈕，點(diǎn)擊“單擊”屬性右邊的“…”打開代碼生成器，在“*****Add2*****”與“*****Add2*****”之間輸入“mdPnt acViewPreview”，保存窗體。

（5）打開窗體“fEmp”的設(shè)計(jì)視圖，選中“bt3”按鈕，并點(diǎn)擊工具欄上的“屬性”按鈕，點(diǎn)擊“單擊”屬性并選擇宏“mEmp”，保存窗體。

（6）打開報(bào)表對(duì)象“rEmp”的設(shè)計(jì)視圖，將“記錄源”屬性設(shè)置為表“tEmp”。

第二篇：2012年計(jì)算機(jī)二級(jí)Access上機(jī)試題及答案(29)

祝您考試順利通過，更多考試資料可以訪問計(jì)算機(jī)考試網(wǎng)http://004km.cn/ncre/ 1.基本操作題

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.mdb”和一個(gè)圖像文件“photo.bmp”。在數(shù)據(jù)庫(kù)文件中已經(jīng)建立一個(gè)表對(duì)象“tStud”。試按以下操作要求，完成各種操作：

(1)設(shè)置“ID”字段為主鍵；并設(shè)置“ID”字段的相應(yīng)屬性，使該字段在數(shù)據(jù)表視圖中的顯示名稱為“學(xué)號(hào)”；(2)刪除“備注”字段；

(3)設(shè)置“入校時(shí)間”字段的有效性規(guī)則和有效性文本。具體規(guī)則是：輸入日期必須在2008年1月1日之后（不包括2008年1月1日）；有效性文本內(nèi)容為：輸入的日期有誤，請(qǐng)重新輸入；

(4)將學(xué)號(hào)為“20011004”學(xué)生的“照片”字段值設(shè)置為考生文件夾下的“photo.bmp”圖像文件（要求使用“由文件創(chuàng)建”方式）；

(5)將凍結(jié)的“姓名”字段解凍，并確?！靶彰弊侄瘟酗@示在“學(xué)號(hào)”字段列的后面。1.基本操作題 【考點(diǎn)分析】

本題考點(diǎn)：設(shè)置主鍵；字段標(biāo)題、有效性規(guī)則等字段屬性的設(shè)置；取消凍結(jié)字段；刪除字段；導(dǎo)出表。(1)【解題步驟】

步驟1：打開“samp1.mdb”數(shù)據(jù)庫(kù)窗口,選中“表”對(duì)象，右鍵單擊“tStud”選擇【設(shè)計(jì)視圖】。步驟2：右鍵單擊“ID”字段選擇【主鍵】。在“標(biāo)題”行輸入“學(xué)號(hào)”。(2)【解題步驟】

步驟1：右鍵單擊“備注”行選擇【刪除行】，在彈出的對(duì)話框中單擊“是”按鈕。(3)【解題步驟】

步驟1：?jiǎn)螕簟叭胄r(shí)間”字段行任一位置，在“有效性規(guī)則”行輸入“>#2008－1－1#”。步驟2：在“有效性文本”行輸入“輸入的日期有誤，請(qǐng)重新輸入”。步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o。(4)【解題步驟】

步驟1：?jiǎn)螕舨藛螜凇疽晥D】|【數(shù)據(jù)表視圖】。

步驟2：右鍵單擊學(xué)號(hào)為“20011004”的學(xué)生的“照片”列選擇【插入對(duì)象】，選中“由文件創(chuàng)建”選項(xiàng)，單擊“瀏覽”按鈕，在“考生文件夾”內(nèi)選中要插入的圖像“photo.bmp”，連續(xù)兩次單擊“確定”按鈕。(5)【解題步驟】

步驟1：?jiǎn)螕舨藛螜凇靖袷健縷【取消對(duì)所有列的凍結(jié)】。

步驟2：選中“姓名”字段列，拖動(dòng)鼠標(biāo)到“學(xué)號(hào)”字段后，松開鼠標(biāo)。步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o。關(guān)閉數(shù)據(jù)表視圖。[page]

2.簡(jiǎn)單應(yīng)用題

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.mdb”，里面已經(jīng)設(shè)計(jì)好一個(gè)表對(duì)象“tTeacher”。試按以下要求完成設(shè)計(jì)：

(1)創(chuàng)建一個(gè)查詢，計(jì)算并輸出教師最大年齡與最小年齡的差值，顯示標(biāo)題為“m_age”，所建查詢命名為“qT1”；

(2)創(chuàng)建一個(gè)查詢，查找并顯示具有研究生學(xué)歷的教師的“編號(hào)”、“姓名”、“性別”和“系別”四個(gè)字段內(nèi)容，所建查詢命名為“qT2”；

(3)創(chuàng)建一個(gè)查詢，查找并顯示年齡小于等于

38、職稱為副教授或教授的教師的“編號(hào)”、“姓名”、“年齡”、“學(xué)歷”和“職稱”五個(gè)字段內(nèi)容，所建查詢命名為“qT3”;(4)創(chuàng)建一個(gè)查詢，查找并統(tǒng)計(jì)在職教師按照職稱進(jìn)行分類的平均年齡，然后顯示出標(biāo)題為“職稱”和“平均年齡”的兩個(gè)字段內(nèi)容，所建查詢命名為“qT4”。2.簡(jiǎn)單應(yīng)用題

【考點(diǎn)分析】本題考點(diǎn)：創(chuàng)建選擇查詢；在查詢中進(jìn)行計(jì)算。

考試吧：004km.cn一個(gè)神奇的考試網(wǎng)站。祝您考試順利通過，更多考試資料可以訪問計(jì)算機(jī)考試網(wǎng)http://004km.cn/ncre/(1)【解題步驟】

步驟1：打開“samp2.mdb”數(shù)據(jù)庫(kù)窗口,選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框中雙擊表“tTeacher”，關(guān)閉“顯示表”對(duì)話框。

步驟2：在字段行輸入：m_age：Max(［年齡］）－Min(［年齡］)，單擊“顯示”行的復(fù)選框使該字段顯示。步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT1”，關(guān)閉設(shè)計(jì)視圖。(2)【解題步驟】

步驟1：選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框中雙擊表“tTeacher”，關(guān)閉“顯示表”對(duì)話框。

步驟2：分別雙擊“編號(hào)”、“姓名”、“性別”、“系別”和“學(xué)歷”字段，在“學(xué)歷”字段的“條件”行輸入“研究生”，單擊“顯示”行取消“學(xué)歷”字段的顯示。

步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT2”，關(guān)閉設(shè)計(jì)視圖。(3)【解題步驟】

步驟1：選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框中雙擊表“tTeacher”，關(guān)閉“顯示表”對(duì)話框。

步驟2：分別雙擊“編號(hào)”、“姓名”、“年齡”、“學(xué)歷”和“職稱”字段。

步驟3：在“年齡”字段的“條件”行輸入“<=38”，在“職稱”字段的“條件”行輸入“教授 or 副教授”。步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT3”，關(guān)閉設(shè)計(jì)視圖。(4)【解題步驟】

步驟1：選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框中雙擊表“tTeacher”，關(guān)閉“顯示表”對(duì)話框。

步驟2：雙擊“職稱”、“年齡”和“在職否”字段，單擊菜單欄【視圖】|【總計(jì)】，在“職稱”、“年齡”和“在職否”字段的“總計(jì)”行分別選擇“分組”、“平均值”和“條件”，在“年齡”字段的“字段”行前面添加“平均年齡：”字樣，在“在職否”字段的“條件”行輸入“Yes”。

步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT4”，關(guān)閉設(shè)計(jì)視圖。[page] 3.綜合應(yīng)用題

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.mdb”，里面已經(jīng)設(shè)計(jì)了表對(duì)象“tEmp”、窗體對(duì)象“fEmp”、報(bào)表對(duì)象“rEmp”和宏對(duì)象“mEmp”。請(qǐng)?jiān)诖嘶A(chǔ)上按照以下要求補(bǔ)充設(shè)計(jì)：

(1)將表對(duì)象“tEmp”中“聘用時(shí)間”字段的格式調(diào)整為“長(zhǎng)日期”顯示、“性別”字段的有效性文本設(shè)置為“只能輸入男和女”；

(2)設(shè)置報(bào)表“rEmp”按照“聘用時(shí)間”字段升序排列輸出；將報(bào)表頁(yè)面頁(yè)腳區(qū)域內(nèi)名為“tPage”的文本框控件設(shè)置為顯示系統(tǒng)日期；

(3)將“fEmp”窗體上名為“bTitle”的標(biāo)簽上移到距“btnP”命令按鈕1厘米的位置（即標(biāo)簽的下邊界距命令按鈕的上邊界1厘米）。同時(shí)，將窗體按鈕“btnP”的單擊事件屬性設(shè)置為宏“mEmp”，以完成按鈕單擊打開報(bào)表的操作。

注意：不允許修改數(shù)據(jù)庫(kù)中的宏對(duì)象“mEmp”；不允許修改窗體對(duì)象“fEmp”和報(bào)表對(duì)象“rEmp”中未涉及的控件和屬性；不允許修改表對(duì)象“tEmp”中未涉及的字段和屬性。3.綜合應(yīng)用題 【考點(diǎn)分析】

本題考點(diǎn)：字段有效性規(guī)則、有效性文本字段屬性的設(shè)置；報(bào)表中文本框和窗體中標(biāo)簽、命令按鈕控件屬性的設(shè)置。(1)【解題步驟】

步驟1：打開“samp3.mdb”數(shù)據(jù)庫(kù)窗口,選中“表”對(duì)象，右鍵單擊“tEmp”選擇【設(shè)計(jì)視圖】。步驟2：?jiǎn)螕簟捌赣脮r(shí)間”字段行任一點(diǎn)，在“格式”行下拉列表中選中“長(zhǎng)日期”。步驟3：?jiǎn)螕簟靶詣e”字段行任一點(diǎn)，在“有效性文本”行輸入“只能輸入男和女”。

考試吧：004km.cn一個(gè)神奇的考試網(wǎng)站。祝您考試順利通過，更多考試資料可以訪問計(jì)算機(jī)考試網(wǎng)http://004km.cn/ncre/ 步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，關(guān)閉設(shè)計(jì)視圖。(2)【解題步驟】

步驟1：選中“報(bào)表”對(duì)象，右鍵單擊“rEmp”選擇【設(shè)計(jì)視圖】。

步驟2：?jiǎn)螕舨藛螜凇疽晥D】|【排序與分組】，在“字段/表達(dá)式”下拉列表中選中“聘用時(shí)間”，在“排序次序”下拉列表中選擇“升序”，關(guān)閉界面。

步驟3：右鍵單擊“tPage”選擇【屬性】，在“控件來(lái)源”行輸入“=Date()”。步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，關(guān)閉設(shè)計(jì)視圖。(3)【解題步驟】

步驟1：選中“窗體”對(duì)象，右鍵單擊“fEmp”選擇【設(shè)計(jì)視圖】。

步驟2：右鍵單擊“btnP”選擇【屬性】，查看“上邊距”記錄值，并記錄下來(lái)。單擊“事件”選項(xiàng)卡，在“單擊”行右側(cè)下拉列表中選中“mEmp”，關(guān)閉屬性界面。

步驟3：右鍵單擊標(biāo)簽控件“bTitle”選擇【屬性】，在“上邊距”行輸入“1cm”，關(guān)閉屬性界面。步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，關(guān)閉設(shè)計(jì)視圖。

考試吧：004km.cn一個(gè)神奇的考試網(wǎng)站。

第三篇：2012年計(jì)算機(jī)二級(jí)Access上機(jī)試題及答案(7)

祝您考試順利通過，更多考試資料可以訪問計(jì)算機(jī)考試網(wǎng)http://004km.cn/ncre/

1.基本操作題

在考生文件夾下，“samp1.mdb”數(shù)據(jù)庫(kù)文件中已建立表對(duì)象“tStud”。試按以下操作要求，完成表的編輯修改：

(1)將“編號(hào)”字段改名為“學(xué)號(hào)”，并設(shè)置為主鍵；

(2)設(shè)置“入校時(shí)間”字段的有效性規(guī)則為2005年之前的時(shí)間（不含2005年）；

(3)刪除表結(jié)構(gòu)中的“照片”字段；

(4)刪除表中學(xué)號(hào)為“000003”和“000011”的兩條記錄；

(5)設(shè)置“年齡”字段的默認(rèn)值為23；

(6)完成上述操作后，將考生文件夾下文本文件“tStud.txt”中的數(shù)據(jù)導(dǎo)入并追加保存在表“tStud”中。參考答案：

1.基本操作題

【考點(diǎn)分析】本題考點(diǎn)：設(shè)置主鍵;字段的有效性規(guī)則、默認(rèn)值等字段屬性的設(shè)置；刪除字段；刪除記錄；導(dǎo)入表。

(1)【解題步驟】

步驟1：打開“samp1.mdb”數(shù)據(jù)庫(kù)窗口，選中“表”對(duì)象，右鍵單擊“tStud”選擇【設(shè)計(jì)視圖】。

步驟2：將“字段名稱”列的“編號(hào)”改為“學(xué)號(hào)”。

步驟3：右鍵單擊“學(xué)號(hào)”行選擇【主鍵】。

(2)【解題步驟】

步驟1：?jiǎn)螕簟叭胄r(shí)間”字段行任一點(diǎn)。

步驟2：在“有效性規(guī)則”行輸入“<#2005－1－1#”。

(3)【解題步驟】

步驟1：右鍵單擊“照片”字段選擇【刪除行】，在彈出的對(duì)話框中單擊“是”按鈕。

步驟2：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o。

(4)【解題步驟】

步驟1：?jiǎn)螕舨藛螜凇疽晥D】|【數(shù)據(jù)表視圖】。

步驟2：選中學(xué)號(hào)為“000003”的數(shù)據(jù)行，右鍵單擊該行選擇【刪除記錄】，在彈出對(duì)話框中單擊“是”按鈕。步驟3：選中學(xué)號(hào)為“000011”的數(shù)據(jù)行，右鍵單擊該行選擇【刪除記錄】，在彈出對(duì)話框中單擊“是”按鈕。步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o。

(5)【解題步驟】

步驟1：?jiǎn)螕舨藛螜凇疽晥D】|【設(shè)計(jì)視圖】。

步驟2：?jiǎn)螕簟澳挲g”字段行任一點(diǎn)，在“默認(rèn)值”行輸入“23”。

步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，關(guān)閉設(shè)計(jì)視圖。

(6)【解題步驟】

步驟1：?jiǎn)螕舨藛螜凇疚募縷【獲取外部數(shù)據(jù)】|【導(dǎo)入】，找到并打開“考生文件夾”，在“文件類型”下拉列表中選中“文本文件”，選中“tStud.txt”文件，單擊“導(dǎo)入”按鈕。

步驟2：?jiǎn)螕簟跋乱徊健卑粹o，選中“第一行包含字段名稱”復(fù)選框，單擊“下一步”，選中“現(xiàn)有的表中”單選按鈕，在右側(cè)下拉列表中選中“tStud”，單擊“下一步”按鈕，單擊“完成”按鈕。[page]

2.簡(jiǎn)單應(yīng)用題

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.mdb”，里面已經(jīng)設(shè)計(jì)好三個(gè)關(guān)聯(lián)表對(duì)象“tStud”、“tCourse”和“tScore”。此外，還提供了窗體“fTest”和宏“mTest”，試按以下要求完成設(shè)計(jì)：

(1)在創(chuàng)建一個(gè)選擇查詢，查找年齡大于25的學(xué)生的“姓名”、“課程名”和“成績(jī)”三個(gè)字段內(nèi)容，所建查詢命名為“qT1”；

(2)創(chuàng)建生成表查詢，組成字段是沒有書法愛好學(xué)生的“學(xué)號(hào)”、“姓名”和“入校年”三列內(nèi)容（其中“入校年”考試吧：004km.cn一個(gè)神奇的考試網(wǎng)站。

數(shù)據(jù)由“入校時(shí)間”字段計(jì)算得到，顯示為四位數(shù)字年的形式），生成的數(shù)據(jù)表命名為“tTemp”，所建查詢命名為“qT2”；

(3)補(bǔ)充窗體“fTest”上“test1”按鈕（名為“bt1”）的單擊事件代碼，實(shí)現(xiàn)以下功能：

打開窗體，在文本框“tText”中輸入一段文字，然后單擊窗體“fTest”上“test1”按鈕（名為“bt1”），補(bǔ)充代碼設(shè)置窗體上標(biāo)簽“bTitle”的標(biāo)題為文本框“tText”輸入內(nèi)容與文本串“等級(jí)考試測(cè)試”的連接并消除連接串的前導(dǎo)和尾隨空白字符。

注意：不允許修改窗體對(duì)象“fTest”中未涉及的控件和屬性；只允許在“*****Add1*****”與“*****Add1*****”之間的空行內(nèi)補(bǔ)充語(yǔ)句、完成設(shè)計(jì)。

(4)設(shè)置窗體“fTest”上“test2”按鈕（名為“bt2”）的單擊事件為宏對(duì)象“mTest”。

參考答案：

2.簡(jiǎn)單應(yīng)用題

【考點(diǎn)分析】

本題考點(diǎn)：創(chuàng)建選擇查詢、生成表查詢；窗體中命令按鈕控件屬性的設(shè)置。

(1)【解題步驟】

步驟1：打開“samp2.mdb”數(shù)據(jù)庫(kù)窗口，選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框中雙擊表“tStud”、“tCourse”、“tScore”，關(guān)閉“顯示表”對(duì)話框。

步驟2：分別雙擊“姓名”、“課程名”、“成績(jī)”、“年齡”字段。

步驟3：在“年齡”字段的“條件”行輸入“>25”，單擊“顯示”行取消該字段的顯示。

步驟4：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT1”。關(guān)閉設(shè)計(jì)視圖。

(2)【解題步驟】

步驟1：選中“查詢”對(duì)象，單擊“新建”按鈕，選中“設(shè)計(jì)視圖”，單擊“確定”按鈕。在“顯示表”對(duì)話框雙擊表“tStud”，關(guān)閉“顯示表”對(duì)話框。

步驟2：?jiǎn)螕舨藛螜凇静樵儭縷【生成表查詢】，在彈出的對(duì)話框中輸入“tTemp”，單擊“確定”按鈕。步驟3：分別雙擊“學(xué)號(hào)”、“姓名”字段將其添加到“字段”行。

步驟4：在“字段”行的下一列輸入“入校年：Year(［入校時(shí)間］)”。

步驟5：雙擊“簡(jiǎn)歷”字段將其添加到“字段”行，在“簡(jiǎn)歷”字段的“條件”行輸入“not like “*書法*””，單擊“顯示”行取消“簡(jiǎn)歷”字段的顯示。

步驟6：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，另存為“qT2”，如圖8所示。關(guān)閉設(shè)計(jì)視圖。

圖8

(3)【解題步驟】

步驟1：選中“窗體”對(duì)象，右鍵單擊“fTest”選擇【設(shè)計(jì)視圖】。

步驟2：右鍵單擊“test1”選擇【事件生成器】，空行內(nèi)輸入代碼：

*****Add1*****

bTitle.Caption=Trim(me!tText+“等級(jí)考試測(cè)試”)

*****Add1*****

(4)【解題步驟】

步驟1：右鍵單擊“test2”選擇【屬性】。

步驟2：?jiǎn)螕簟笆录边x項(xiàng)卡，在“單擊”行右側(cè)下拉列表中選中“mTest”，關(guān)閉屬性界面。

步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o，關(guān)閉設(shè)計(jì)視圖。[page]

3.綜合應(yīng)用題

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.mdb”，里面已經(jīng)設(shè)計(jì)好表對(duì)象“tEmployee”和查詢對(duì)象“qEmployee”，同時(shí)還設(shè)計(jì)出以“qEmployee”為數(shù)據(jù)源的報(bào)表對(duì)象“rEmployee”。試在此基礎(chǔ)上按照以下要求補(bǔ)充報(bào)表設(shè)計(jì)：

(1)在報(bào)表的報(bào)表頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其標(biāo)題顯示為“職員基本信息表”，并命名為“bTitle”；

(2)將報(bào)表主體節(jié)區(qū)中名為“tDate”的文本框顯示內(nèi)容設(shè)置為“聘用時(shí)間”字段值；

(3)在報(bào)表的頁(yè)面頁(yè)腳區(qū)添加一個(gè)計(jì)算控件，以輸出頁(yè)碼。計(jì)算控件放置在距上邊0.25厘米、距左側(cè)14厘米位置，并命名為“tPage”。規(guī)定頁(yè)碼顯示格式為“當(dāng)前頁(yè)/總頁(yè)數(shù)”，如1/20、2/20、…、20/20等。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tEmployee”和查詢對(duì)象“qEmployee”；不允許修改報(bào)表對(duì)象“rEmployee”中未涉及的控件和屬性。

參考答案：

3.綜合應(yīng)用題

【考點(diǎn)分析】

本題考點(diǎn)：在報(bào)表中添加標(biāo)簽、文本框控件及其控件屬性的設(shè)置。

(1)【解題步驟】

步驟1：打開“samp3.mdb”數(shù)據(jù)庫(kù)窗口，選中“報(bào)表”對(duì)象，右鍵單擊“rEmployee”選擇【設(shè)計(jì)視圖】。步驟2：選中工具箱中“標(biāo)簽”控件按鈕，單擊報(bào)表頁(yè)眉節(jié)區(qū)適當(dāng)位置，然后輸入“職工基本信息表”，單擊報(bào)表任一點(diǎn)。

步驟3：右鍵單擊“職工基本信息表”標(biāo)簽選擇【屬性】，在“名稱”行輸入“bTitle”，關(guān)閉屬性界面。

(2)【解題步驟】

步驟1：右鍵單擊“tDate”文本框選擇【屬性】。

步驟2：在“控件來(lái)源”行右側(cè)下拉列表中選中“聘用時(shí)間”字段，關(guān)閉屬性界面。

(3)【解題步驟】

步驟1：選中工具箱中“文本框”控件，單擊報(bào)表頁(yè)面頁(yè)腳節(jié)區(qū)任一點(diǎn)，彈出“Text”標(biāo)簽和“未綁定”文本框，選中“Text”標(biāo)簽，然后按下“Del”鍵將“Text”標(biāo)簽刪除。

步驟2：右鍵單擊“未綁定”文本框選擇【屬性】，彈出屬性對(duì)話框。選中“全部”選項(xiàng)卡，在“名稱”行輸入“tPage”，分別在“上邊距”和“左邊距”輸入“0.25cm”和“14cm”。單擊“控件來(lái)源”行輸入“＝［Page］&“/”&［Pages］”，關(guān)閉屬性界面。

步驟3：?jiǎn)螕艄ぞ邫谥小氨４妗卑粹o。關(guān)閉設(shè)計(jì)視圖。

第四篇：access上機(jī)練習(xí)題

1.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立表對(duì)象“tEmployee ”。試按以下操作要求，完成表的編輯：

(1)分析“tEmployee”表的結(jié)構(gòu)，判斷并設(shè)置主鍵。

(2)刪除表中的“所屬部門”字段；設(shè)置“年齡”字段的有效性規(guī)則為只能

輸入大于16的數(shù)據(jù)。

(3)在表結(jié)構(gòu)中的“年齡”與“職務(wù)”兩個(gè)字段之間增添一個(gè)新的字段：字

段名稱為“黨員否”，字段類型為“是/否”型；刪除表中1999年5月聘

用、并具有“相聲”愛好的女職工記錄。

(4)設(shè)置“職務(wù)”字段值的輸入方式為從下拉列表中選擇“職員”、“主管

”或“經(jīng)理”選項(xiàng)值。

(5)設(shè)置“聘用時(shí)間”字段的相關(guān)屬性，使該字段按照“XXXX/XX/XX”格式

輸入。例如，2013/06/08。

(6)將表中聘用時(shí)間超過30年（不含30年）的職工“職務(wù)”字段值更改為“

退休”。

1.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tStud”和“tTemp”。tStud表是學(xué)校歷年來(lái)招收的學(xué)生名單，每名學(xué)生均 有身份證號(hào)。對(duì)于現(xiàn)在正在讀書的“在校學(xué)生”，均有家長(zhǎng)身份證號(hào)，對(duì)于已 經(jīng)畢業(yè)的學(xué)生，家長(zhǎng)身份證號(hào)為空。

例如，表中學(xué)生“張春節(jié)”沒有家長(zhǎng)身份證號(hào)，表示張春節(jié)已經(jīng)從本校畢 業(yè)，是“校友”。

表中學(xué)生“李強(qiáng)”的家長(zhǎng)身份證號(hào)為“***370”，表示李強(qiáng) 為在校學(xué)生。由于在tStud表中身份證號(hào)“***370”對(duì)應(yīng)的學(xué)生姓 名是“李永飛”，表示李強(qiáng)的家長(zhǎng)李永飛是本校校友。

“張?zhí)臁钡募议L(zhǎng)身份證號(hào)為“***760”，表示張?zhí)焓窃谛W(xué) 生；由于在tStud表中身份證號(hào)“***760”沒有對(duì)應(yīng)的記錄，表示 張?zhí)斓募议L(zhǎng)不是本校的校友。

請(qǐng)按下列要求完成設(shè)計(jì)：

(1)創(chuàng)建一個(gè)查詢，要求顯示在校學(xué)生的“身份證號(hào)”和“姓名”兩列內(nèi)容，所建查詢命名為“qT1”。

(2)創(chuàng)建一個(gè)查詢，要求按照身份證號(hào)碼找出所有學(xué)生家長(zhǎng)是本校校友的學(xué)生

記錄。輸出學(xué)生身份證號(hào)、姓名及家長(zhǎng)姓名三列內(nèi)容，標(biāo)題顯示為“身份

證號(hào)”、“姓名”和“家長(zhǎng)姓名”，所建查詢命名為“qT2”。

(3)創(chuàng)建一個(gè)查詢，統(tǒng)計(jì)數(shù)學(xué)成績(jī)?yōu)?00分的學(xué)生人數(shù)，標(biāo)題顯示為“num”，所建查詢命名為“qT3”。

要求：使用“身份證號(hào)”字段進(jìn)行計(jì)數(shù)統(tǒng)計(jì)。

(4)創(chuàng)建一個(gè)查詢，將“tStud”表中總分成績(jī)超過270分（含270）的學(xué)生信

息追加到空表“tTemp”中。其中，“tTemp”表的入學(xué)成績(jī)?yōu)閷W(xué)生總分，所建查詢命名為“qT4”。1.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tTeacher”、窗體對(duì)象“fTest”，報(bào)表對(duì)象“rTeacher”和宏對(duì)象“m1”。試在此基礎(chǔ)上按照以下要求補(bǔ)充窗體設(shè)計(jì)和報(bào)表設(shè)計(jì)：

（1）將報(bào)表對(duì)象rTeacher的報(bào)表主體節(jié)區(qū)中名為“性別”的文本框顯示內(nèi)容

設(shè)置為“性別”字段值，并將文本框名稱更名為“tSex”。

（2）在報(bào)表對(duì)象rTeacher的報(bào)表頁(yè)腳節(jié)區(qū)位置添加一個(gè)計(jì)算控件，計(jì)算并顯

示教師的平均工齡。計(jì)算控件放置在距上邊0.3厘米、距左側(cè)3.6厘米，命名為“tAvg”。

（3）設(shè)置窗體對(duì)象fTest上名為“btest”的命令按鈕的單擊事件屬性為給定的宏對(duì)象m1。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tTeacher”和宏對(duì)象“m1”；不允許

修改窗體對(duì)象“fTest” 和報(bào)表對(duì)象“rTeacher”中未涉及的控件和

屬性。

2.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立兩個(gè)表對(duì)象“員工 表”和“部門表”。試按以下要求，完成表的各種操作：

（1）分析兩個(gè)表對(duì)象“員工表”和“部門表”的構(gòu)成，判斷其中的外鍵屬性，將其字段名稱作為“員工表”表屬性中說明的內(nèi)容進(jìn)行設(shè)置。

（2）將“員工表”中有攝影愛好的員工其“備注”字段的值設(shè)為True（即復(fù)

選框里打上鉤）。

（3）刪除聘用時(shí)間超過30年（含30年）、“職務(wù)”為“經(jīng)理”的職工。（4）將考生文件夾下文本文件Test.txt中的數(shù)據(jù)導(dǎo)入追加到當(dāng)前數(shù)據(jù)庫(kù)的“

員工表”相應(yīng)字段中。

（5）設(shè)置相關(guān)屬性，使“員工表”中“密碼”字段以密碼方式輸入并顯示。（6）建立“員工表”和“部門表”的表間關(guān)系，并實(shí)施參照完整性。

2.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好三個(gè) 關(guān)聯(lián)表對(duì)象“tStud”、“tCourse”和“tScore”及表對(duì)象“tTemp”。試按以 下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找選課學(xué)分超過3分或沒有先修課的學(xué)生記錄，并顯示

學(xué)生的“姓名”、“課程名”和“成績(jī)”三個(gè)字段內(nèi)容，所建查詢命名

為“qT1”。

（2）創(chuàng)建一個(gè)查詢，查找5號(hào)入校的學(xué)生，顯示其“學(xué)號(hào)”、“姓名”、“性

別”和“年齡”四個(gè)字段內(nèi)容，所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，查找選課成績(jī)均在80分（含80分）以上的學(xué)生記錄，并

顯示“學(xué)號(hào)”和“平均成績(jī)”兩列內(nèi)容。其中“平均成績(jī)”一列數(shù)據(jù)由

統(tǒng)計(jì)計(jì)算得到，所建查詢命名為“qT3”。

（4）創(chuàng)建一個(gè)查詢，將“tStud”表中女學(xué)生的信息追加到“tTemp”表對(duì)應(yīng)的字段中，所建查詢命名為“qT4”。

2.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tEmployee”和宏對(duì)象“m1”，同時(shí)還設(shè)計(jì)出以“tEmployee”為數(shù)據(jù)源的 窗體對(duì)象“fEmployee”。試在此基礎(chǔ)上按照以下要求補(bǔ)充窗體設(shè)計(jì)：

（1）在窗體的窗體頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其名稱為“bTitle”，初始化標(biāo)題顯示為“雇員基本信息”，字體名稱為“黑體”，字號(hào)為

18。

（2）將命令按鈕bList的標(biāo)題設(shè)置為“顯示雇員情況”。

（3）單擊命令按鈕bList，要求運(yùn)行宏對(duì)象m1；單擊事件代碼已提供，請(qǐng)補(bǔ)

充完整。

（4）取消窗體的水平滾動(dòng)條和垂直滾動(dòng)條；取消窗體的最大化和最小化按

鈕。

（5）窗體加載時(shí)，將“Tda”標(biāo)簽標(biāo)題設(shè)置為“YYYY年雇員信息”，其中

“YYYY”為系統(tǒng)當(dāng)前年份（要求使用相關(guān)函數(shù)獲?。?，例如，2013年

雇員信息。窗體“加載”事件代碼已提供，請(qǐng)補(bǔ)充完整。

注意：不允許修改窗體對(duì)象“fEmployee”中未涉及的控件和屬性；不允許

修改表對(duì)象“tEmployee”和宏對(duì)象“m1”。

程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

3.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立表對(duì)象“tEmp”。試 按以下操作要求，完成對(duì)表“tEmp”的編輯修改和操作：（1）將“編號(hào)”字段改名為“工號(hào)”，并設(shè)置為主鍵；按所屬部分修改工號(hào)，修改規(guī)則為：部門“01”的“工號(hào)”首字符為“1”，部門“02”首字符

為“2”，依次類推。

（2）設(shè)置“年齡”字段的有效性規(guī)則為不能是空值。

（3）設(shè)置“聘用時(shí)間”字段的默認(rèn)值為系統(tǒng)當(dāng)前年的一月一號(hào)。

（4）刪除表結(jié)構(gòu)中的“簡(jiǎn)歷”字段；設(shè)置“聘用時(shí)間”字段的相關(guān)屬性，使

該字段按照“XXXX/XX/XX”格式輸入，例如，2013/07/08。

（5）將考生文件夾下“samp0.accdb”數(shù)據(jù)庫(kù)文件中的表對(duì)象“tTemp”導(dǎo)入到

“samp1.accdb”數(shù)據(jù)庫(kù)文件中。

（6）完成上述操作后，在“samp1.accdb”數(shù)據(jù)庫(kù)文件中做一個(gè)表對(duì)象“tEmp

”的備份，命名為“tEL”。

3.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好二個(gè)表 對(duì)象“tTeacher1”和“tTeacher2”。試按以下要求完成設(shè)計(jì)：（1）創(chuàng)建一個(gè)查詢，查找并顯示在職教師的“編號(hào)”、“姓名、“年齡”和“性

別”四個(gè)字段內(nèi)容，所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，查找年齡低于所有職工平均年齡的職工記錄，并顯示“編

號(hào)姓名”和“聯(lián)系電話”兩列信息，其中“編號(hào)姓名”由“編號(hào)”與“姓

名”兩個(gè)字段合二為一構(gòu)成，所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，按輸入的參加工作時(shí)間的月份查找，并顯示教師的“編號(hào)”、“姓名”、“年齡”和“性別”四個(gè)字段內(nèi)容，當(dāng)運(yùn)行該查詢時(shí)，應(yīng)顯

示提示信息：“請(qǐng)輸入月份”，所建查詢命名為“qT3”。

（4）創(chuàng)建一個(gè)查詢，將“tTeacher1”表中的黨員教授的記錄追加到

“tTeacher2”表相應(yīng)的字段中，所建查詢命名為“qT4”。

3.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tStud”、查詢對(duì)象“qStud”、窗體對(duì)象“fStud”和子窗體對(duì)象“fDetail ”，同時(shí)還設(shè)計(jì)出以“qStud”為數(shù)據(jù)源的報(bào)表對(duì)象“rStud”。請(qǐng)?jiān)诖嘶A(chǔ)上按 照以下要求補(bǔ)充“fStud”窗體和“rStud”報(bào)表的設(shè)計(jì)：

（1）在報(bào)表的報(bào)表頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其名稱為“bTitle”，標(biāo)題顯示為“團(tuán)員基本信息表”；將名稱為“tSex”的文本框控件的輸出內(nèi)容設(shè) 置為 “性別”字段值。在報(bào)表頁(yè)腳節(jié)區(qū)添加一個(gè)計(jì)算控件，其名稱為“tAvg”, 設(shè)置相關(guān)屬性，輸出學(xué)生的平均年齡。

（2）將“fStud”窗體對(duì)象主體節(jié)中控件的Tab鍵焦點(diǎn)移動(dòng)順序設(shè)置為：

“CItem”→“TxtDetail” →“CmdRefer” →“CmdList” →

“CmdClear” →“fDetail” →“簡(jiǎn)單查詢”。

（3）在窗體加載事件中，實(shí)現(xiàn)重置窗體標(biāo)題為標(biāo)簽“tTitle”的標(biāo)題內(nèi)容。

（4）試根據(jù)以下窗體功能要求，對(duì)已給的事件過程進(jìn)行代碼補(bǔ)充，并運(yùn)行 調(diào)試。

在窗體中有一個(gè)組合框控件和一個(gè)文本框控件，名稱分別為“CItem”和 “TxtDetail”；有兩個(gè)標(biāo)簽控件，名稱分別為“Label3”和“Ldetail”；還 有三個(gè)命令按鈕，名稱分別為“CmdList”、“CmdRefer”和“CmdClear”。在“CItem”組合框中選擇某一項(xiàng)目后，“Ldetail”標(biāo)簽控件將顯示出所選 項(xiàng)目名加上“內(nèi)容：”。在“TxtDetail”文本框中輸入具體項(xiàng)目值后，單擊 “CmdRefer”命令按鈕，如果“CItem”和“TxtDetail”兩個(gè)控件中均有值，則在子窗體中顯示找出的相應(yīng)記錄，如果兩個(gè)控件中沒有值，顯示提示框，提示框標(biāo)題為“注意”，提示文字為“查詢項(xiàng)目或查詢內(nèi)容不能為空??！”，提示框中只有一個(gè)“確定”按鈕；單擊“CmdList”命令按鈕，在子窗體中顯 示“tStud”表中的全部記錄；單擊“CmdClear”命令按鈕，將清空控件 “cItem”和“TxtDetail”中的值。

注意：不允許修改窗體對(duì)象“fStud” 和子窗體對(duì)象“fDetail”中未涉 及的控件、屬性和任何VBA代碼；不允許修改報(bào)表對(duì)象“rStud”中已有的控 件和屬性；不允許修改表對(duì)象“tStud”和查詢對(duì)象“qStud”。只允許在

“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一條代碼語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存在的語(yǔ)句。

4.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立表對(duì)象“tEmployee ”。試按以下操作要求，完成表的編輯：

(1)分析表的結(jié)構(gòu)，判斷并設(shè)置主鍵。

(2)設(shè)置“年齡”字段的“有效性規(guī)則”屬性為：非空且非負(fù)。

(3)設(shè)置“聘用時(shí)間”字段的默認(rèn)值為：系統(tǒng)當(dāng)前月的最后一天。

(4)交換表結(jié)構(gòu)中的“職務(wù)”與“聘用時(shí)間”兩個(gè)字段的位置。

(5)刪除1995年聘用的“職員”職工信息。

(6)在編輯完的表中追加以下一條新記錄：

4.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好兩個(gè) 關(guān)聯(lián)表對(duì)象“tStaff”和“tSalary”及表對(duì)象“tTemp”。試按以下要求完成設(shè) 計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找下半年聘用的經(jīng)理，并顯示“工號(hào)”、“姓名、“年

齡”和“性別”四個(gè)字段內(nèi)容，所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，查找各位員工在2005年的工資信息，并顯示“工號(hào)”、“

工資合計(jì)”和“水電房租費(fèi)合計(jì)”三列內(nèi)容。其中，“工資合計(jì)”和“水

電房租費(fèi)合計(jì)”兩列數(shù)據(jù)均由統(tǒng)計(jì)計(jì)算得到，所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，查找并顯示員工的“年月”、“姓名”、“工資”、“水電

房租費(fèi)”及“應(yīng)發(fā)工資”五列內(nèi)容。其中“應(yīng)發(fā)工資”列數(shù)據(jù)由計(jì)算得到，計(jì)算公式為：應(yīng)發(fā)工資=工資-水電房租費(fèi)，所建查詢命名為“qT3”。（4）創(chuàng)建一個(gè)查詢，將表“tTemp”中“年齡”字段值均加1，所建查詢命名

為“qT4”。

4.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tStud”和查詢對(duì)象“qStud”，同時(shí)還設(shè)計(jì)出以“qStud”為數(shù)據(jù)源的報(bào)表 對(duì)象“rStud”。試在此基礎(chǔ)上按照以下要求補(bǔ)充報(bào)表設(shè)計(jì)：

（1）在報(bào)表的報(bào)表頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其名稱為“bTitle”，標(biāo)題顯示為“團(tuán)員基本信息表”。

（2）在報(bào)表的主體節(jié)區(qū)添加一個(gè)文本框控件，顯示“性別”字段值。該控

件放置在距上邊0.1厘米、距左邊5.2厘米，并命名為“tSex”。

（3）在報(bào)表頁(yè)腳節(jié)區(qū)添加一個(gè)計(jì)算控件，計(jì)算并顯示學(xué)生平均年齡。計(jì)算

控件放置在距上邊0.2厘米、距左邊4.5厘米，并命名為“tAvg”。

（4）利用表達(dá)式按“編號(hào)”字段前四位分組統(tǒng)計(jì)各組記錄個(gè)數(shù)，并將統(tǒng)計(jì)

結(jié)果顯示在組頁(yè)腳節(jié)區(qū)。計(jì)算控件命名為“tCount”。

要求：按“編號(hào)”字段進(jìn)行統(tǒng)計(jì)操作。

注意：不允許改動(dòng)數(shù)據(jù)庫(kù)中的表對(duì)象“tStud”和查詢對(duì)象“qStud”，同時(shí)

也不允許修改報(bào)表對(duì)象“rStud”中已有的控件和屬性。

5.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”，里邊已建立兩個(gè) 表對(duì)象“tGrade”和“tStudent”；同時(shí)還存在一個(gè)Excel文件“tCourse.xls”。試按以下操作要求，完成表的編輯：

（1）將Excel文件“tCourse.xls”鏈接到“samp1.mdb”數(shù)據(jù)庫(kù)文件中，鏈接表

名稱不變，要求：數(shù)據(jù)中的第一行作為字段名。（2）將“tGrade”表中隱藏的列顯示出來(lái)。

（3）將“tStudent”表中“政治面貌”字段的默認(rèn)值屬性設(shè)置為“團(tuán)員”，并

使該字段在數(shù)據(jù)表視圖中的顯示標(biāo)題改為“政治面目”。

（4）設(shè)置“tStudent”表的顯示格式，使表背景顏色為主題顏色的“橄欖色，強(qiáng)

調(diào)文字顏色3，深色50%”，文字顏色為標(biāo)準(zhǔn)色中的“黃色”、字號(hào)為10號(hào)。（5）將北京五中畢業(yè)學(xué)生的學(xué)號(hào)第3、4位改為“09”。（6）建立“tGrade” 和“tStudent”兩表之間的關(guān)系。

5.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好三個(gè) 關(guān)聯(lián)表對(duì)象“tStud”、“tCourse” 和“tScore”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找并顯示有攝影愛好的男女學(xué)生各自人數(shù)，字段顯示標(biāo)

題為“性別”和“NUM”，所建查詢命名為“qT1”。

注意，要求用學(xué)號(hào)字段來(lái)統(tǒng)計(jì)人數(shù)。

（2）創(chuàng)建一個(gè)查詢，查找上半年入校的學(xué)生選課記錄，并顯示“姓名”和

“課程名”兩個(gè)字段內(nèi)容，所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，查找沒有先修課程的課程相關(guān)信息，輸出其“課程號(hào)”、“課程名”和“學(xué)分”三個(gè)字段內(nèi)容，所建查詢命名為“qT3”。（4）創(chuàng)建更新查詢，將表對(duì)象“tStud”中低于平均年齡（不含平均年齡）學(xué)

生的“備注”字段值設(shè)置為True，所建查詢命名為“qT4”。

5.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì)象 “tStud“，同時(shí)還設(shè)計(jì)出窗體對(duì)象“fStud”和子窗體對(duì)象“fDetail”。請(qǐng)?jiān)诖嘶?礎(chǔ)上按照以下要求補(bǔ)充“fStud”窗體的設(shè)計(jì)：（1）將窗體標(biāo)題改為“學(xué)生查詢”。（2）將窗體的邊框樣式改為“細(xì)邊框”，取消窗體中的水平和垂直滾動(dòng)條、記錄

選擇器、導(dǎo)航按鈕和分隔線；將子窗體邊框樣式改為“細(xì)邊框”，取消子窗

體中的記錄選擇器、導(dǎo)航按鈕和分隔線。（3）在窗體中有兩個(gè)標(biāo)簽控件,名稱分別為“Label1”和“Label2”,將這兩個(gè)標(biāo)

簽上的文字顏色改為“#FFFFFF”,背景顏色設(shè)置為“#2F3699”。（4）將窗體主體節(jié)中控件的Tab鍵次序改為：

“CItem”→“TxtDetail” →“CmdRefer” →“CmdList” →“CmdClear

” →“fDetail” →“簡(jiǎn)單查詢” →“Frame18“。（5）按照以下窗體功能，補(bǔ)充事件代碼設(shè)計(jì)。

在窗體中有一個(gè)組合框控件和一個(gè)文本框控件，名稱分別為“CItem”和“

TxtDetail”；有兩個(gè)標(biāo)簽控件，名稱分別為“Label3”和“Ldetail”；還

有三個(gè)命令按鈕，名稱分別為“CmdList”、“CmdRefer”和“CmdClear”

。在“CItem”組合框中選擇某一項(xiàng)目后，“Ldetail”標(biāo)簽控件將顯示出

所選項(xiàng)目名加上“內(nèi)容：”。在“TxtDetail“文本框中輸入具體項(xiàng)目值后，單擊“CmdRefer”命令按鈕，如果“CItem”和“TxtDetail”兩個(gè)控件中

均有值，則在子窗體中顯示找出的相應(yīng)記錄，如果兩個(gè)控件中不全有值，顯示消息框，消息框標(biāo)題為“注意”，提示文字為“查詢項(xiàng)目和查詢內(nèi)容

不能為空！！”，消息框中只有一個(gè)“確定”按鈕；單擊“CmdList”命

令按鈕，在子窗體中顯示“tStud“表中的全部記錄；單擊“CmdClear”命

令按鈕，將“cItem”和“TxtDetail”兩個(gè)控件中的值清空。

注意：不允許修改窗體對(duì)象“fStud” 和子窗體對(duì)象“fDetail“中未涉及的控件、屬性和任何VBA代碼；不允許修改表對(duì)象“tStud”。

代碼設(shè)計(jì)只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一條語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

6.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立兩個(gè)表對(duì)象“員工 表”和“部門表”及一個(gè)報(bào)表對(duì)象“rEmp”。試按以下要求順序，完成表及報(bào)表 的各種操作：

（1）設(shè)置“員工表”的職務(wù)字段有效性規(guī)則為只能輸入“經(jīng)理”、“主管”和“

職員”三者之一；同時(shí)設(shè)置相應(yīng)有效性文本為“請(qǐng)輸入有效職務(wù)”。

（2）分析員工的聘用時(shí)間，將截止到2008年聘用期在10年（含10年）以上的員工

其“說明”字段的值設(shè)置為“老職工”。

要求：以2008年為截止期判斷員工的聘用期，不考慮月日因素。比如，聘用

時(shí)間在2000年的員工，其聘用期為8年。（3）刪除員工表中姓名含“鋼”字的員工紀(jì)錄。

（4）將“員工表”中女職工的前四列信息（編號(hào)，姓名，性別，年齡）導(dǎo)出到考

生文件夾下，以文本文件形式保存，命名為Test.txt。

要求各數(shù)據(jù)項(xiàng)間以逗號(hào)分隔，且第一行包含字段名稱。

（5）建立表對(duì)象“員工表”和“部門表”的表間關(guān)系，并實(shí)施參照完整性。（6）將報(bào)表對(duì)象“rEmp”的記錄源設(shè)置為表對(duì)象“員工表”。

6.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好四個(gè) 關(guān)聯(lián)表對(duì)象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”以及表 對(duì)象“tTemp”，同時(shí)還設(shè)計(jì)出窗體對(duì)象“fQuery”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找姓“王”病人的基本信息，并顯示“姓名”、“年齡

”、“性別”，所建查詢名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，統(tǒng)計(jì)年齡小于30歲的醫(yī)生被病人預(yù)約的次數(shù)，輸出“醫(yī)生

姓名”和“預(yù)約人數(shù)”兩列信息。要求預(yù)約人數(shù)用“病人ID”字段計(jì)數(shù)并

降序排序，所建查詢名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，刪除表對(duì)象“tTemp”內(nèi)所有“預(yù)約日期”為10月份中20

日以后（含 20日）的記錄，所建查詢名為“qT3”。

（4）現(xiàn)有一個(gè)已經(jīng)建好的“fQuery”窗體。運(yùn)行該窗體后，在文本框（文本框名

稱為tName）中輸入要查詢的科室名，然后按下“查詢”按鈕，即運(yùn)行一個(gè)

名為“qT4”的查詢?！皅T4”查詢的功能是顯示所查科室的“科室ID”和

“預(yù)約日期”。請(qǐng)?jiān)O(shè)計(jì)“qT4”查詢。

6.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tAddr”和“tUser”，同時(shí)還設(shè)計(jì)出窗體對(duì)象“fEdit”和“fEuser”。請(qǐng)?jiān)?此基礎(chǔ)上按照以下要求補(bǔ)充“fEdit”窗體的設(shè)計(jì)：

（1）將窗體中名稱為“Lremark”的標(biāo)簽控件上的文字顏色設(shè)置為“#FF0000”

、字體粗細(xì)改為“加粗”。

（2）將窗體標(biāo)題設(shè)為“顯示/修改用戶口令”。

（3）將窗體邊框改為“對(duì)話框邊框”樣式，取消窗體中的水平和垂直滾動(dòng)條、記錄選擇器、導(dǎo)航按鈕、分隔線和控制框。

（4）將窗體中“退出”命令按鈕（名稱為“cmdquit”）上的文字字體粗細(xì)改為

“加粗”，并在文字下方加上下劃線。

（5）在窗體中還有“修改”和“保存”兩個(gè)命令按鈕，名稱分別為“CmdEdit”

和“CmdSave”，其中“保存”命令按鈕在初始狀態(tài)為不可用，當(dāng)單擊“修

改”按鈕后，“保存”按鈕變?yōu)榭捎?。?dāng)單擊“保存”按鈕后，輸入焦點(diǎn)

移到“修改”按鈕。此時(shí)，程序可以修改已有的用戶相

關(guān)信息，現(xiàn)已編寫了部分VBA代碼，請(qǐng)補(bǔ)充完整。

要求：修改后運(yùn)行該窗體，并查看修改結(jié)果。

注意：不允許修改窗體對(duì)象“fEdit”和“fEuser”中未涉及的控件、屬

性；不允許修改表對(duì)象“tAddr”和“tUser”。

程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

7.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已創(chuàng)建兩個(gè)表對(duì)象“員工 表”和“部門表”及一個(gè)窗體對(duì)象“fEmp”。試按以下要求順序，完成表及窗體 的各種操作：

（1）對(duì)表對(duì)象“員工表”操作，按照員工性別不同，為編號(hào)字段值增補(bǔ)前

置字符，男性員工編號(hào)前增補(bǔ)字符“8”，女性員工編號(hào)前增補(bǔ)字符“

6”，如男性的000001更改為8000001，女性的000002更改為6000002。

（2）查出員工張漢望的對(duì)應(yīng)密碼內(nèi)容，將密碼實(shí)際值追加到其簡(jiǎn)歷內(nèi)容末

尾。

（3）設(shè)置表對(duì)象“員工表”的部門號(hào)字段值為列表框下拉選擇，其值引用

“部門表”的對(duì)應(yīng)字段。

（4）將“員工表”姓名中的所有“小”字替換為“曉”。

（5）依據(jù)“員工表”中的職務(wù)信息，在經(jīng)理和主管員工對(duì)應(yīng)的“說明”字

段內(nèi)輸入“干部”信息。

（6）設(shè)置窗體對(duì)象“fEmp”的“記錄源”屬性和“篩選”屬性，使其打開

后輸出“員工表”的女員工信息。

7.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好兩個(gè) 表對(duì)象住宿登記表“tA”和住房信息表“tB”，其中“tA”和“tB”表中“房 間號(hào)”的前兩位為樓號(hào)。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找樓號(hào)為“01”的客人記錄，并顯示“姓名”、“入住

日期”和“價(jià)格”三個(gè)字段內(nèi)容，所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，按輸入的房間價(jià)格區(qū)間查找，顯示“房間號(hào)”字段信息。

當(dāng)運(yùn)行查詢時(shí)，應(yīng)分別顯示提示信息“最低價(jià)”和“最高價(jià)”，所建查詢

命名為“qT2”。

（3）以表對(duì)象“tB”為基礎(chǔ)，創(chuàng)建一個(gè)交叉表查詢。要求：選擇樓號(hào)為行標(biāo)題、列名稱顯示為“樓號(hào)”，“房屋類別”為列標(biāo)題來(lái)統(tǒng)計(jì)輸出每座樓房的各

類房間的平均房?jī)r(jià)信息。所建查詢命名為“qT3”。

注：房間號(hào)的前兩位為樓號(hào)。

交叉表查詢不做各行小計(jì)。

（4）創(chuàng)建一個(gè)查詢，統(tǒng)計(jì)出各種類別房屋的數(shù)量。輸出兩列信息，字段標(biāo)題分

別為“type”和“num”，所建查詢命名為“qT4”。

7.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tNorm”和“tStock”，查詢對(duì)象“qStock”和宏對(duì)象“m1”，同時(shí)還設(shè)計(jì) 出以“tNorm”和“tStock”為數(shù)據(jù)源的窗體對(duì)象“fStock”和“fNorm”。試 在此基礎(chǔ)上按照以下要求補(bǔ)充窗體設(shè)計(jì)：

（1）將“fStock”窗體的標(biāo)題設(shè)置為“庫(kù)存瀏覽”；在“fStock”窗體對(duì)

象的窗體頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其名稱為“bTitle”，初

始化標(biāo)題顯示為“庫(kù)存瀏覽”，字體名稱為“黑體”，字號(hào)為18，字

體粗細(xì)為“加粗”。

（2）在“fStock”窗體對(duì)象的窗體頁(yè)腳節(jié)區(qū)位置添加一個(gè)命令按鈕，命名

為“bList”，按鈕標(biāo)題為“顯示信息”。

（3）設(shè)置所建命令按鈕bList的單擊事件屬性為運(yùn)行宏對(duì)象m1。

（4）設(shè)置相關(guān)屬性，取消在子窗體中添加新記錄的功能。

（5）將“fStock”窗體對(duì)象中的“fNorm”子窗體的導(dǎo)航按鈕去掉。

（6）為當(dāng)前數(shù)據(jù)庫(kù)設(shè)置“啟用布局視圖”。

注意：不允許修改窗體對(duì)象中未涉及的控件和屬性；不允許修改表對(duì)象“

tNorm”、“tStock”和宏對(duì)象“m1”。

8.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，“samp1.accdb”數(shù)據(jù)庫(kù)文件中已建立兩個(gè)表對(duì)象“員工 表”和“部門表”。試按以下要求，完成表的各種操作：

（1）設(shè)置表對(duì)象“員工表”的聘用時(shí)間字段有效性規(guī)則為：1950年（含）以后的日期；同時(shí)設(shè)置相應(yīng)有效性文本為“請(qǐng)輸入有效日期”。

（2）將表對(duì)象“員工表”中編號(hào)為“000008”的員工的照片字段值替換為考生文

件夾下的圖像文件“000008.bmp”數(shù)據(jù)。

（3）刪除員工表中姓名字段含有“紅”字的員工紀(jì)錄；隱藏表對(duì)象“員工表”的“所屬部門”字段。

（4）查找部門“04”的女主管，將其“編號(hào)”字段首字符更改為“4”。

（5）刪除表對(duì)象“員工表”和“部門表”之間已建立的錯(cuò)誤表間關(guān)系，重新建立

正確關(guān)系。

（6）將考生文件夾下Excel文件Test.xls中的數(shù)據(jù)導(dǎo)入到當(dāng)前數(shù)據(jù)庫(kù)的新表中。

要求第一行包含列標(biāo)題，導(dǎo)入其中的“編號(hào)”、“姓名”“性別”“年齡”

和“職務(wù)”五個(gè)字段，選擇“編號(hào)”字段為主鍵，新表命名為“tmp”。

8.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好三個(gè) 關(guān)聯(lián)表對(duì)象“tStud”、“tCourse”、“tScore”和一個(gè)臨時(shí)表“tTemp”及一 個(gè)窗體對(duì)象“fTmp”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找并顯示沒有運(yùn)動(dòng)愛好學(xué)生的“學(xué)號(hào)”、“姓名”、“

性別”和“年齡”四個(gè)字段內(nèi)容，所建查詢命名為“qT1”。（2）創(chuàng)建一個(gè)查詢，查找并顯示所有學(xué)生的“姓名”、“課程號(hào)”和“成績(jī)”

三個(gè)字段內(nèi)容，所建查詢命名為“qT2”。

注意，這里涉及選課和沒選課的所有學(xué)生信息，要考慮選擇合適查詢聯(lián)接

屬性。

（3）創(chuàng)建一個(gè)參數(shù)查詢，查找并顯示學(xué)生的“學(xué)號(hào)”、“姓名”、“性別”和“

年齡”四個(gè)字段內(nèi)容。其中設(shè)置性別字段為參數(shù)，參數(shù)條件要引用窗體“

fTmp”上控件“tSS”的值，所建查詢命名為“qT3”。

（4）創(chuàng)建一個(gè)查詢，刪除臨時(shí)表對(duì)象“tTemp”中年齡為奇數(shù)的記錄，所建查詢

命名為“qT4”。

8.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)了表對(duì) 象“tEmp”、窗體對(duì)象“fEmp”、報(bào)表對(duì)象“rEmp”和宏對(duì)象“mEmp”。同時(shí)，給出窗體對(duì)象“fEmp”上一個(gè)按鈕的單擊事件代碼，試按以下功能要求補(bǔ)充設(shè)計(jì):（1）打開窗體時(shí)設(shè)置窗體標(biāo)題為“XXXX年信息輸出”顯示，其中“XXXX”為系統(tǒng)

當(dāng)前年份（要求用相關(guān)函數(shù)獲取），例如，2013年信息輸出。窗體“打開”

事件代碼已提供，請(qǐng)補(bǔ)充完整。

（2）調(diào)整窗體對(duì)象“fEmp”上“退出”按鈕（名為“bt2”）的大小和位置，要

求大小與“報(bào)表輸出”按鈕（名為“bt1”）一致，且左邊對(duì)齊“報(bào)表輸出

”按鈕，上邊距離“報(bào)表輸出”按鈕1厘米（即“bt2”鈕的上邊距離“bt1

”鈕的下邊1厘米）。

（3）利用表達(dá)式將報(bào)表記錄數(shù)據(jù)按照姓氏分組升序排列，同時(shí)要求在相關(guān)組頁(yè)

眉區(qū)域添加一個(gè)文本框控件（命名為“tm”），設(shè)置屬性顯示出姓氏信息

來(lái)，如“陳”、“劉”、...等。

注意，這里不用考慮復(fù)姓等特殊情況。所有姓名的第一個(gè)字符視為其姓氏

信息。

（4）單擊窗體“報(bào)表輸出”按鈕（名為“bt1”），調(diào)用事件代碼實(shí)現(xiàn)以預(yù)覽方

式打開報(bào)表“rEmp”；單擊“退出”按鈕（名為“bt2”），調(diào)用設(shè)計(jì)好的宏“mEmp”來(lái)關(guān)閉窗體。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tEmp”和宏對(duì)象“mEmp”；不允許

修改窗體對(duì)象“fEmp”和報(bào)表對(duì)象“rEmp”中未涉及的控件和屬性。

程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

9.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”、一個(gè)Excel文件 “tScore.xls”和一個(gè)圖像文件“photo.bmp”。在數(shù)據(jù)庫(kù)文件中已經(jīng)建立了一 個(gè)表對(duì)象“tStud”。試按以下操作要求，完成各種操作：

（1）設(shè)置“ID”字段為主鍵；并設(shè)置“ID”字段的相應(yīng)屬性，使該字段在數(shù)據(jù)

表視圖中的顯示標(biāo)題為“學(xué)號(hào)”；

（2）將“性別”字段的默認(rèn)值屬性設(shè)置為“男”，設(shè)置“入校時(shí)間”字段的相

關(guān)屬性，使該字段的輸入格式為“XXXX/XX/XX”，例如，2013/06/08；（3）設(shè)置“入校時(shí)間”字段的有效性規(guī)則和有效性文本。有效性規(guī)則為：輸入的入校時(shí)間必須為9月；有效性文本內(nèi)容為“輸入的月份有誤，請(qǐng)重新輸

入”；

（4）將學(xué)號(hào)為“20041002”學(xué)生的“照片”字段值設(shè)置為考生文件夾下的“

photo.bmp”圖像文件（要求使用“由文件創(chuàng)建”方式）；

（5）設(shè)置“政治面目”字段的輸入方式為從下拉列表中選擇“團(tuán)員”、“黨員”

和“其他”選項(xiàng)值；

（6）將考生文件夾下的“tScore.xls”文件導(dǎo)入到“samp1.mdb”數(shù)據(jù)庫(kù)文件

中，表名不變，主鍵為表中的“ID”字段。

9.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好三個(gè) 關(guān)聯(lián)表對(duì)象“tStud”、“tScore”和“tCourse”，試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找年齡高于平均年齡的黨員記錄，并顯示“姓名”、“

性別”和“入校時(shí)間”。所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，按輸入的成績(jī)區(qū)間查找，并顯示“姓名”、“課程名”和

“成績(jī)”。當(dāng)運(yùn)行該查詢時(shí)，應(yīng)分別顯示提示信息：“最低分”和“最高

分”。所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，統(tǒng)計(jì)并顯示各門課程男女生的平均成績(jī)，統(tǒng)計(jì)顯示結(jié)果如

下圖所示。所建查詢命名為“qT3”。

要求：平均分結(jié)果用Round函數(shù)取整輸出。

【圖片】

（4）創(chuàng)建一個(gè)查詢，運(yùn)行該查詢后生成一個(gè)新表，表名為“tTemp”，表結(jié)構(gòu)包

括“姓名”、“課程名”和“成績(jī)”等三個(gè)字段，表內(nèi)容為不及格的所有

學(xué)生記錄。所建查詢命名為“qT4”。要求創(chuàng)建此查詢后，運(yùn)行該查詢，并

查看運(yùn)行結(jié)果。

9.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tStud”，同時(shí)還設(shè)計(jì)出窗體對(duì)象“fStud”。請(qǐng)?jiān)诖嘶A(chǔ)上按照以下要求補(bǔ) 充“fStud”窗體的設(shè)計(jì)：

（1）在窗體的“窗體頁(yè)眉”中距左邊1.2厘米、距上邊1.2厘米處添加一個(gè)直線

控件，控件寬度為7.8厘米，邊框顏色改為“藍(lán)色“（藍(lán)色代碼為

#0000FF），控件命名為“tLine”；

（2）將窗體中名稱為“l(fā)Talbel”的標(biāo)簽控件上的文字顏色改為“藍(lán)色”（藍(lán)色

代碼為#0000FF）、字體名稱改為“華文行楷”、字號(hào)改為22；

（3）將窗體邊框改為“細(xì)邊框”樣式，取消窗體中的水平和垂直滾動(dòng)條、記錄選

擇器、導(dǎo)航按鈕和分隔線；并且只保留窗體的關(guān)閉按鈕；（4）假設(shè)“tStud”表中，“學(xué)號(hào)”字段的第5位和6位編碼代表該生的專業(yè)信息，當(dāng)這兩位編碼為“10”時(shí)表示“信息”專業(yè)，為其他值時(shí)表示“管理”專業(yè)

。設(shè)置窗體中名稱為“tSub”的文本框控件的相應(yīng)屬性，使其根據(jù)“學(xué)號(hào)”

字段的第5位和第6位編碼顯示對(duì)應(yīng)的專業(yè)名稱；

（5）在窗體中有一個(gè)“退出”命令按鈕，名稱為“CmdQuit”,單擊該按鈕，彈出

提示框。提示框標(biāo)題為“提示”，提示框內(nèi)容為“確認(rèn)退出?”，并顯示問

號(hào)圖標(biāo)；提示框中有兩個(gè)按鈕，分別為“是”和“否”，單擊“是”按鈕，關(guān)閉消息框和當(dāng)前窗體，單擊“否”按鈕，關(guān)閉消息框。請(qǐng)按照VBA代碼中的指示將實(shí)現(xiàn)此功能的代碼填入指定的位置中。

注意：不允許修改窗體對(duì)象“fStud”中未涉及的控件、屬性和任何VBA代

碼；不允許修改表對(duì)象“tStud”；

程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

10.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”和一個(gè)Excel文件“ tQuota.xls”。在數(shù)據(jù)庫(kù)文件中已經(jīng)建立了一個(gè)表對(duì)象“tStock”。試按以下操 作要求，完成各種操作：

（1）分析“tStock”表的字段構(gòu)成，判斷并設(shè)置其主鍵。

（2）在“tStock”表的“規(guī)格”和“出廠價(jià)”字段之間增加一個(gè)新字段，字段

名稱為“單位”，數(shù)據(jù)類型為文本，字段大小為1；設(shè)置有效性規(guī)則，保

證只能輸入“只”或“箱”。

（3）刪除“tStock”表中的“備注”字段，并為該表的“產(chǎn)品名稱”字段創(chuàng)建

查閱列表，列表中顯示“燈泡”、“節(jié)能燈”和“日光燈”三個(gè)值。（4）向“tStock”表中輸入數(shù)據(jù)有如下要求：第一，“出廠價(jià)”只能輸入3位

整數(shù)和2位小數(shù)（整數(shù)部分可以不足3位），第二，“單位”字段的默認(rèn)值

為“只”。設(shè)置相關(guān)屬性以實(shí)現(xiàn)這些要求。

（5）將考生文件夾下的“tQuota.xls”文件導(dǎo)入到“samp1.accdb”數(shù)據(jù)庫(kù)文

件中，表名不變，分析該表的字段構(gòu)成，判斷并設(shè)置其主鍵；設(shè)置表的相

關(guān)屬性，保證輸入的“最低儲(chǔ)備”字段值低于“最高儲(chǔ)備”字段值，當(dāng)輸

入的數(shù)據(jù)違反有效性規(guī)則時(shí)，提示“最低儲(chǔ)備值必須低于最高儲(chǔ)備值”。（6）建立“tQuota”表與“tStock”表之間的關(guān)系。

10.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tQuota”和“tStock”，試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找?guī)齑鏀?shù)量高于30000（包含30000）的產(chǎn)品，并顯示“

產(chǎn)品名稱”、“規(guī)格”、“庫(kù)存數(shù)量”和“最高儲(chǔ)備”等字段內(nèi)容，所建

查詢命名為qT1。

（2）創(chuàng)建一個(gè)查詢，查找某類產(chǎn)品的庫(kù)存情況，并顯示“產(chǎn)品名稱”、“規(guī)格”

和“庫(kù)存數(shù)量”等字段內(nèi)容，所建查詢名為“qT2”；當(dāng)運(yùn)行該查詢時(shí)，提

示框中應(yīng)顯示“請(qǐng)輸入產(chǎn)品類別：”。

說明：產(chǎn)品類別為“產(chǎn)品ID”字段值的第1位。

（3）創(chuàng)建一個(gè)查詢，查找?guī)齑鏀?shù)量超過（不含）最高儲(chǔ)備的產(chǎn)品，并顯示“產(chǎn)

品名稱”、“庫(kù)存數(shù)量”和“最高儲(chǔ)備”等字段內(nèi)容。所建查詢命名為“

qT3”。

（4）創(chuàng)建一個(gè)查詢，計(jì)算每類產(chǎn)品不同單位的庫(kù)存金額總計(jì)。要求，行標(biāo)題顯

示“產(chǎn)品名稱”，列標(biāo)題顯示“單位”。所建查詢命名為“qT4”。

說明：庫(kù)存金額=單價(jià)×庫(kù)存數(shù)量。

10.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好窗體 對(duì)象“fSys”。請(qǐng)?jiān)诖嘶A(chǔ)上按照以下要求補(bǔ)充“fSys”窗體的設(shè)計(jì)：（1）將窗體的邊框樣式設(shè)置為“對(duì)話框邊框”，取消窗體中的水平和垂直滾動(dòng)條、記錄選擇器、導(dǎo)航按鈕、分隔線、控制框、關(guān)閉按鈕、最大化按鈕和最小

化按鈕。

（2）將窗體標(biāo)題欄顯示文本設(shè)置為“系統(tǒng)登錄”。（3）將窗體中“用戶名稱”（名稱為“l(fā)User”）和“用戶密碼”（名稱為“

lPass）兩個(gè)標(biāo)簽上的文字顏色改為淺綜色（淺綜色代碼為#800000)、字

體粗細(xì)改為“加粗”。（4）在窗體加載時(shí)，“tPass”文本框的內(nèi)容以密碼形式顯示。窗體“加載”事

件代碼已給出，請(qǐng)補(bǔ)充完整。

（5）按照以下窗體功能，補(bǔ)充事件代碼設(shè)計(jì)。

在窗體中有“用戶名稱”和“用戶密碼”兩個(gè)文本框，名稱分別為“tUser

”和“tPass”，還有“確定”和“退出”兩個(gè)命令按鈕，名稱分別為“

cmdEnter”和“cmdQuit”。在“tUser”和“tPass”兩個(gè)文本框中輸入用

戶名稱和用戶密碼后，單擊“確定”按鈕，程序?qū)⑴袛噍斎氲闹凳欠裾_，如果輸入的用戶名稱為“cueb”，用戶密碼為“1234”，則顯示正確提示

框；如果輸入不正確，則提示框顯示內(nèi)容為“密碼錯(cuò)誤！”，同時(shí)清除“

tUser”和“tPass”兩個(gè)文本框中的內(nèi)容，并將光標(biāo)置于“tUser”文本框

中。當(dāng)單擊窗體上的“退出”按鈕后，關(guān)閉當(dāng)前窗體。

注意：不允許修改窗體對(duì)象“fSys”中未涉及的控件、屬性和任何VBA代碼。

只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充

一條語(yǔ)句，不允許增刪和修改其它位置已存在的語(yǔ)句。

11.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾（1）考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”。試修改職工表“

employee”的結(jié)構(gòu)，在“職工號(hào)”字段后增加“姓名”字段，其數(shù)據(jù)類型

為文本型，長(zhǎng)度為6，并對(duì)應(yīng)職工號(hào)添加其姓名，見下表。

【圖片】

（2）判斷并設(shè)置表“employee”的主鍵，同時(shí)將上面增加的“姓名”字段隱藏

起來(lái)。

（3）設(shè)置表“employee”的“基本工資”字段的默認(rèn)值為：1000。

（4）在當(dāng)前數(shù)據(jù)庫(kù)中，對(duì)表“employee”做一個(gè)備份，命名為表“tEmp”。（5）設(shè)置表“employee”的有效性規(guī)則為：“津貼”字段的值必須小于等于“

基本工資”字段值。

（6）將已有的“水費(fèi).xls”文件導(dǎo)入到samp1.mdb數(shù)據(jù)庫(kù)中，將導(dǎo)入的表命名為

“水費(fèi)記錄”。“水費(fèi)記錄”表結(jié)構(gòu)調(diào)整如下。

【圖片】

11.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好三個(gè)關(guān) 聯(lián)表對(duì)象“tStud”、“tCourse”、“tScore”和一個(gè)空表“tTemp”。試按 以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，統(tǒng)計(jì)人數(shù)在5人以上（不含5）的院系人數(shù)，字段顯示標(biāo)題

為“院系號(hào)”和“人數(shù)”，所建查詢命名為“qT1”。

注意：要求按照學(xué)號(hào)來(lái)統(tǒng)計(jì)人數(shù)。

（2）創(chuàng)建一個(gè)查詢，查找非“04” 院系的選課學(xué)生信息，輸出其“姓名”、“

課程名”和“成績(jī)”三個(gè)字段內(nèi)容，所建查詢命名為“qT2”。（3）創(chuàng)建一個(gè)查詢，查找還沒有選課的學(xué)生的姓名，所建查詢命名為“qT3”。（4）創(chuàng)建一個(gè)查詢，將前5條記錄的學(xué)生信息追加到表“tTemp”的對(duì)應(yīng)字段中，所建查詢命名為“qT4”。

11.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì)象 “tStud”、查詢對(duì)象“qStud”、窗體對(duì)象“fStud”和子窗體對(duì)象“fDetail”，同時(shí)還設(shè)計(jì)出以“qStud”為數(shù)據(jù)源的報(bào)表對(duì)象“rStud”。請(qǐng)?jiān)诖嘶A(chǔ)上按照 以下要求補(bǔ)充“fStud”窗體和“rStud”報(bào)表的設(shè)計(jì)：

（1）在報(bào)表的報(bào)表頁(yè)眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其名稱為“bTitle”，標(biāo)題顯示為“團(tuán)員基本信息表”；將名稱為“tSex”的文本框控件的輸

出內(nèi)容設(shè)置為 “性別”字段值。在報(bào)表頁(yè)腳節(jié)區(qū)添加一個(gè)計(jì)算控件，其名稱為“tAvg”,設(shè)置相關(guān)屬性，輸出學(xué)生的平均年齡。

（2）將“fStud”窗體對(duì)象主體節(jié)中控件的Tab鍵次序移動(dòng)順序設(shè)置為：

“CItem”→“TxtDetail” →“CmdRefer” →“CmdList” →

“CmdClear” →“fDetail” →“簡(jiǎn)單查詢”。

（3）在窗體加載事件中，實(shí)現(xiàn)重置窗體標(biāo)題為當(dāng)前年月加標(biāo)簽“tTitle”的標(biāo)題內(nèi)容，如“2013年06月xxxx”。其中，當(dāng)前年月要求用函數(shù)獲

得，xxxx部分是標(biāo)簽“tTitle”的標(biāo)題內(nèi)容。

（4）試根據(jù)以下窗體功能要求，對(duì)已給的事件過程進(jìn)行代碼補(bǔ)充，并運(yùn)行

調(diào)試。

在窗體中有一個(gè)組合框控件和一個(gè)文本框控件，名稱分別為“CItem”和 “TxtDetail”；有兩個(gè)標(biāo)簽控件，名稱分別為“Label3”和“Ldetail”；還 有三個(gè)命令按鈕，名稱分別為“CmdList”、“CmdRefer”和“CmdClear”。在“CItem”組合框中選擇某一項(xiàng)目后，“Ldetail”標(biāo)簽控件將顯示出所選 項(xiàng)目名加上“內(nèi)容：”。在“TxtDetail”文本框中輸入具體項(xiàng)目值后，單擊 “CmdRefer”命令按鈕，如果“CItem”和“TxtDetail”兩個(gè)控件中均有值，則在子窗體中顯示找出的相應(yīng)記錄，如果兩個(gè)控件中沒有值，顯示提示框，提示框標(biāo)題為“注意”，提示文字為“查詢項(xiàng)目或查詢內(nèi)容不能為空?。　?，提示框中只有一個(gè)“確定”按鈕；單擊“CmdList”命令按鈕，在子窗體中顯 示“tStud”表中的全部記錄；單擊“CmdClear”命令按鈕，將清空控件 “cItem”和“TxtDetail”中的值。

注意：不允許修改窗體對(duì)象“fStud” 和子窗體對(duì)象“fDetail”中未涉 及的控件、屬性和任何VBA代碼；不允許修改報(bào)表對(duì)象“rStud”中已有的控 件和屬性；不允許修改表對(duì)象“tStud”和查詢對(duì)象“qStud”。只允許在

“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一條代碼語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存在的語(yǔ)句。

12.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)Excel文件“Test.xls”和一個(gè)數(shù)據(jù)庫(kù)文件“ samp1.accdb”。庫(kù)文件中已建立三個(gè)表對(duì)象（名為“線路”、“游客”和“團(tuán) 隊(duì)”）和一個(gè)窗體對(duì)象（名為“brow”）。試按以下要求，完成表和窗體的各 種操作：

（1）將“線路”表中的“線路ID”字段設(shè)置為主鍵；設(shè)置“天數(shù)”字段的有效

性規(guī)則屬性，有效性規(guī)則為非空且大于0。

（2）將“團(tuán)隊(duì)”表中的“團(tuán)隊(duì)ID”字段設(shè)置為主鍵；追加“線路ID”新字段，數(shù)據(jù)類型為“文本”，字段大小為8。

（3）將“游客”表中的“年齡”字段刪除；添加兩個(gè)字段，字段名分別為“證

件編號(hào)”和“證件類別”；“證件編號(hào)”的數(shù)據(jù)類型為“文本”，字段大

小為20；“證件類別”字段的數(shù)據(jù)類型為“文本”，字段大小為8，其值的輸入要求從下拉列表選擇“身份證”、“軍官證”或“護(hù)照”之一。（4）將考生文件夾下Test.xls文件中的數(shù)據(jù)鏈接到當(dāng)前數(shù)據(jù)庫(kù)中。要求：數(shù)據(jù)

中的第一行作為字段名，鏈接表對(duì)象命名為“tTest”。（5）建立“線路”、“團(tuán)隊(duì)”和“游客”三表之間的關(guān)系，并實(shí)施參照完整性。（6）修改窗體“brow”，取消“記錄選擇器”和“分隔線”顯示，在窗體頁(yè)眉

處添加一個(gè)標(biāo)簽控件（名為L(zhǎng)ine）,標(biāo)簽標(biāo)題為“線路介紹”，字體名稱

為隸書、字體大小為18。

12.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.mdb”，里面已經(jīng)設(shè)計(jì)好兩個(gè)表對(duì) 象“tA”和“tB”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找并顯示6月份入住客人的“姓名”、“房間號(hào)”、“

電話”和“入住日期”四個(gè)字段內(nèi)容，所建查詢命名為“qT1”。

（2）創(chuàng)建一個(gè)查詢，能夠在客人每次結(jié)賬時(shí)根據(jù)客人的姓名提示統(tǒng)計(jì)這個(gè)客人

已住天數(shù)和應(yīng)交金額，并顯示“姓名”、“房間號(hào)”、“已住天數(shù)”和“

應(yīng)交金額”，所建查詢命名為“qT2”。

注：輸入姓名時(shí)應(yīng)提示“請(qǐng)輸入姓名”。

已住天數(shù)按系統(tǒng)時(shí)間為客人結(jié)賬日進(jìn)行計(jì)算。

應(yīng)交金額=已住天數(shù)*價(jià)格。

（3）創(chuàng)建一個(gè)查詢，查找“身份證”字段第4位至第6位值為“102”的紀(jì)錄，并

顯示“姓名”、“入住日期”和“價(jià)格”三個(gè)字段內(nèi)容，所建查詢命名為

“qT3”。

（4）以表對(duì)象“tB”為數(shù)據(jù)源創(chuàng)建一個(gè)查詢，使用房間號(hào)統(tǒng)計(jì)并顯示每棟樓的各類房間個(gè)數(shù)。行標(biāo)題為“樓號(hào)”，列標(biāo)題為“房間類別”，所建查詢命

名為“qT4”。

注：房間號(hào)的前兩位為樓號(hào)。

12.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)了表對(duì)象 “tEmp”、查詢對(duì)象“qEmp”和窗體對(duì)象“fEmp”。同時(shí)，給出窗體對(duì)象“fEmp ”上兩個(gè)按鈕的單擊事件代碼，試按以下要求補(bǔ)充設(shè)計(jì)。

（1）將窗體“fEmp”上名稱為“tSS”的文本框控件改為組合框控件，控件名稱

不變，標(biāo)簽標(biāo)題不變。設(shè)置組合框控件的相關(guān)屬性，以實(shí)現(xiàn)從下拉列表中

選擇輸入性別值“男”和“女”。

（2）選擇合適字段，將查詢對(duì)象“qEmp”改為參數(shù)查詢，參數(shù)為引用窗體對(duì)象

“fEmp”上組合框“tSS”的輸入值。

（3）將窗體對(duì)象“fEmp”上名稱為“tPa”的文本框控件設(shè)置為計(jì)算控件。要求

依據(jù)“黨員否”字段值顯示相應(yīng)內(nèi)容。如果“黨員否”字段值為True,顯示

“黨員”兩個(gè)字；如果“黨員否”字段值為False,顯示“非黨員”三個(gè)字。（4）在窗體對(duì)象“fEmp”上有“刷新”和“退出”兩個(gè)命令按鈕，名稱分別為

“bt1”和“bt2”。單擊“刷新”按鈕，窗體記錄源改為查詢對(duì)象“qEmp

”；單擊“退出”按鈕，關(guān)閉窗體?，F(xiàn)已編寫了部分VBA代碼，請(qǐng)按照VBA

代碼中的指示將代碼補(bǔ)充完整。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tEmp”；不允許修改查詢對(duì)象“qEmp

”中未涉及的內(nèi)容；不允許修改窗體對(duì)象“fEmp”中未涉及的控件和

屬性。

程序代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一行語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存

在的語(yǔ)句。

13.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”。在數(shù)據(jù)庫(kù)文件中已 經(jīng)建立了五個(gè)表對(duì)象“tOrder”、“tDetail”、“tEmployee”、“tCustom” 和“tBook”。試按以下操作要求，完成各種操作：

（1）分析“tOrder”表對(duì)象的字段構(gòu)成，判斷并設(shè)置其主鍵。

（2）設(shè)置“tDetail”表中“訂單明細(xì)ID”字段和“數(shù)量”字段的相應(yīng)屬性，使

“訂單明細(xì)ID”字段在數(shù)據(jù)表視圖中的顯示標(biāo)題為“訂單明細(xì)編號(hào)”，將

“數(shù)量”字段取值非空且大于0。

（3）刪除“tBook”表中的“備注”字段；并將“類別”字段的“默認(rèn)值”屬性

設(shè)置為“計(jì)算機(jī)”。

（4）設(shè)置“tEmployee”表中“性別”字段相關(guān)屬性，實(shí)現(xiàn)下拉列表選擇“男”

和“女”之一。

（5）將“tCustom”表中“郵政編碼”和“電話號(hào)碼”兩個(gè)字段的數(shù)據(jù)類型改

為“文本”，將“郵政編碼”字段的“輸入掩碼”屬性設(shè)置為“郵政編碼

”，將“電話號(hào)碼”字段的輸入掩碼屬性設(shè)置為“010-XXXXXXXX”，其中，“X”為數(shù)字位，且只能是0～9之間的數(shù)字。（6）建立五個(gè)表之間的關(guān)系。

13.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì)象 “tOrder”、“tDetail”、“tEmployee”和“tBook”，試按以下要求完成設(shè) 計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找清華大學(xué)出版社出版的圖書中定價(jià)大于等于20且小于

等于30的圖書，并按定價(jià)從大到小順序顯示“書籍名稱”、“作者名”和

“出版社名稱”。所建查詢名為“qT1”。（2）創(chuàng)建一個(gè)查詢，查找某月出生雇員的售書信息，并顯示“姓名”、“書籍

名稱”、“訂購(gòu)日期”、“數(shù)量”和“單價(jià)”。當(dāng)運(yùn)行該查詢時(shí)，提示框

中應(yīng)顯示“請(qǐng)輸入月份：”。所建查詢名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，計(jì)算每名雇員的獎(jiǎng)金，顯示標(biāo)題為“雇員號(hào)”和“獎(jiǎng)金”

。所建查詢名為“qT3”。

說明：銷售金額 = 單價(jià)*數(shù)量。

獎(jiǎng)金 = 銷售金額合計(jì)數(shù)×5%。

（4）創(chuàng)建一個(gè)查詢，查找單價(jià)低于定價(jià)的圖書，并顯示“書籍名稱”、“類別

”、“作者名”、“出版社名稱”。所建查詢名為“qT4”。

13.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì)象 “tOrder”、“tDetail”和“tBook”，查詢對(duì)象“qSell”，報(bào)表對(duì)象“rSell ”。請(qǐng)?jiān)诖嘶A(chǔ)上按照以下要求補(bǔ)充“rSell”報(bào)表的設(shè)計(jì)：

（1）對(duì)報(bào)表進(jìn)行適當(dāng)設(shè)置，使報(bào)表顯示“qSell”查詢中的數(shù)據(jù)。

（2）對(duì)報(bào)表進(jìn)行適當(dāng)設(shè)置，使報(bào)表標(biāo)題欄上顯示的文字為“銷售情況報(bào)表”；

在報(bào)表頁(yè)眉處添加一個(gè)標(biāo)簽，標(biāo)簽名為“bTitle”，顯示文本為“圖書銷

售情況表”，字體名稱為“黑體”、顏色為褐色（褐色代碼為#7A4E2B）、字號(hào)為20，文字不傾斜。

（3）對(duì)報(bào)表中名稱為“txtMoney”的文本框控件進(jìn)行適當(dāng)設(shè)置，使其顯示每本

書的金額（金額=數(shù)量*單價(jià)）。

（4）在報(bào)表適當(dāng)位置添加一個(gè)文本框控件（控件名稱為“txtAvg”），計(jì)算每本圖書的平均單價(jià)。

說明：報(bào)表適當(dāng)位置指報(bào)表頁(yè)腳、頁(yè)面頁(yè)腳或組頁(yè)腳

要求：使用Round函數(shù)將計(jì)算出的平均單價(jià)保留兩位小數(shù)（5）在報(bào)表頁(yè)腳處添加一個(gè)文本框控件（控件名稱為“txtIf”），判斷所售圖

書的金額合計(jì)，如果金額合計(jì)大于30000，“txtIf”控件顯示“達(dá)標(biāo)”，否則顯示“未達(dá)標(biāo)”。

注意：不允許修改報(bào)表對(duì)象“rSell”中未涉及的控件、屬性；不允許修

改表對(duì)象“tOrder”、“tDetail”和“tBook”，不允許修改查

詢對(duì)象“qSell”。

14.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”，里邊已經(jīng)設(shè)計(jì)好 了表對(duì)象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”。試按以 下操作要求，完成各種操作：

（1）在“samp1.mdb”數(shù)據(jù)庫(kù)中建立一個(gè)新表，名為“tNurse”，表結(jié)構(gòu)如下表

所示： 【圖片】

（2）判斷并設(shè)置表“tNurse”的主鍵。（3）設(shè)置“護(hù)士姓名”字段為必需字段、“工作日期”字段的默認(rèn)值為系統(tǒng)當(dāng)

前月的第一天（規(guī)定：系統(tǒng)日期必須由函數(shù)獲取）。設(shè)置“護(hù)士ID”字段

的有效性規(guī)則，保證輸入的第一個(gè)字符為“N”。

（4）將下表所列數(shù)據(jù)輸入到“tNurse”表中，且顯示格式應(yīng)與下表相同?！緢D片】

（5）向“tDoctor”表“性別”字段中輸入數(shù)據(jù)有如下要求：第一，輸入方式

為從下拉列表中選擇“男”、或“女”值；第二，初始值為“男”。設(shè)置

相關(guān)屬性以實(shí)現(xiàn)這些要求。（6）通過相關(guān)字段建立“tDoctor”、“tOffice”、“tPatient”和“

tSubscribe”等四表之間的關(guān)系，同時(shí)使用“實(shí)施參照完整性”。

14.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好兩個(gè) 表對(duì)象“tEmployee”和“tGroup”。試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找并顯示沒有運(yùn)動(dòng)愛好的職工的“編號(hào)”、“姓名”、“性別”、“年齡”和“職務(wù)”五個(gè)字段內(nèi)容，所建查詢命名為“

qT1”。

（2）創(chuàng)建一個(gè)查詢，查找并顯示聘期超過5年（必須使用函數(shù)獲?。┑拈_發(fā)

部職工的“編號(hào)”、“姓名”、“職務(wù)”和“聘用時(shí)間”四個(gè)字段內(nèi)

容，所建查詢命名為“qT2”。

（3）創(chuàng)建一個(gè)查詢，計(jì)算5月份聘用的、男女生每個(gè)部門的最小年齡。要

求，第一列顯示性別，第一行顯示部門名稱，所建查詢名為“qT3”。

（4）創(chuàng)建一個(gè)查詢，查找年齡低于所有職工平均年齡并且職務(wù)為經(jīng)理的職

工記錄，并顯示“管理人員”信息。其中管理人員由“編號(hào)”和“姓

名”兩列信息合二為一構(gòu)成（比如，編號(hào)為“000011”、姓名為“吳

大偉”的數(shù)據(jù)輸出形式為“000011吳大偉”），所建查詢命名為“

qT4”。

14.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)了表對(duì) 象“tEmp”、窗體對(duì)象“fEmp”、報(bào)表對(duì)象“rEmp” 和宏對(duì)象“mEmp”。試在 此基礎(chǔ)上按照以下要求補(bǔ)充設(shè)計(jì)：

（1）設(shè)置報(bào)表“rEmp”按照“年齡”字段升序排列輸出；將報(bào)表頁(yè)面頁(yè)腳區(qū)域

內(nèi)名為“tPage”的文本框控件設(shè)置為“第N頁(yè)，共M頁(yè)”形式的頁(yè)碼顯示

（如第1頁(yè)，共15頁(yè)、第2頁(yè)，共15頁(yè)、?）。

（2）設(shè)置窗體對(duì)象“fEmp”背景圖像為考生文件夾下的圖像文件“photo.bmp”，并將該圖像以平鋪方式顯示。

（3）在窗體加載事件中實(shí)現(xiàn)代碼重置窗體標(biāo)題為標(biāo)簽“bTitle”的標(biāo)題內(nèi)容。（4）試根據(jù)以下窗體功能要求，對(duì)已給的事件過程進(jìn)行代碼補(bǔ)充，并運(yùn)行調(diào)試。

在“fEmp”窗體上單擊“輸出”命令按鈕（名為“btnP”），計(jì)算滿足表

達(dá)式1+2+3+?+n<=30000的最大n值，并將n的值顯示在窗體上名為“tData”的文本框內(nèi)并輸出到外部文件保存。單擊“打開表”命令按鈕（名為“

btnQ”），代碼調(diào)用宏對(duì)象“mEmp”以打開數(shù)據(jù)表“tEmp”。

注意：不允許修改數(shù)據(jù)庫(kù)中的表對(duì)象“tEmp”和宏對(duì)象“mEmp”；不允許

修改窗體對(duì)象“fEmp”和報(bào)表對(duì)象“rEmp”中未涉及的控件和屬性；

只允許在“*****Add*****”與“****Add******”之間的空行內(nèi)補(bǔ)

充語(yǔ)句、完成設(shè)計(jì)，不允許增刪和修改其它位置已存在的語(yǔ)句。

15.1

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

在考生文件夾下，存在一個(gè)數(shù)據(jù)庫(kù)文件“samp1.accdb”，里面已經(jīng)建立了 表對(duì)象“tBook”、“tDetail”、“tEmp”和“tOrder”，宏對(duì)象“mTest”。試按以下要求，完成各種操作：

（1）將“tOrder”表中“訂單ID”字段的數(shù)據(jù)類型改為“文本”，字段大

小改為10；設(shè)置該字段的相關(guān)屬性，使其在數(shù)據(jù)表視圖中顯示為“訂

單號(hào)”。

（2）向“tOrder”表“訂購(gòu)日期”字段中輸入數(shù)據(jù)有如下要求：第一，輸

入格式為“XXXX/XX/XX(如，2011/01/08)”；第二，輸入的數(shù)據(jù)為

2011年1月至8月產(chǎn)生的；第三，當(dāng)輸入的數(shù)據(jù)不符合要求時(shí)，顯示“

輸入數(shù)據(jù)有誤，請(qǐng)重新輸入”信息。設(shè)置相關(guān)屬性以實(shí)現(xiàn)這些要求。

（3）向“tBook”表“類別”字段中輸入數(shù)據(jù)有如下要求：第一，輸入方

式為從下拉列表中選擇“JSJ”、或“KJ”值；第二，初始值為“

JSJ”。設(shè)置相關(guān)屬性以實(shí)現(xiàn)這些要求。

（4）在數(shù)據(jù)表視圖中進(jìn)行相關(guān)設(shè)置，使其能夠顯示出“tEmp”表中所有字

段的數(shù)據(jù)。

（5）建立“tBook”、“tDetail”、“tEmp”和“tOrder”等四張表之

間的關(guān)系，并全部實(shí)施參照完整性。

（6）將宏“mTest”重命名，保存為自動(dòng)執(zhí)行的宏。

15.2

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp2.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tCourse”、“tScore”和“tStud”，試按以下要求完成設(shè)計(jì)：

（1）創(chuàng)建一個(gè)查詢，查找人數(shù)為20的班級(jí)，并顯示“班級(jí)編號(hào)”和“班級(jí)

人數(shù)”。所建查詢名為“qT1”。

要求：使用“姓名”字段統(tǒng)計(jì)人數(shù)。

說明：“學(xué)號(hào)”字段的前8位為班級(jí)編號(hào)。

（2）創(chuàng)建一個(gè)查詢，查找平均成績(jī)最高的課程，并顯示“課程名”和“平

均成績(jī)”。所建查詢名為“qT2”。

要求：使用Round函數(shù)實(shí)現(xiàn)平均成績(jī)保留整數(shù)。

（3）創(chuàng)建一個(gè)查詢，計(jì)算男女生每門課程的最高成績(jī)。要求，第一列顯示

性別，第一行顯示課程名。所建查詢名為“qT3”。

（4）創(chuàng)建一個(gè)查詢，運(yùn)行該查詢后生成一張新表，表名為“tNew”，表結(jié)

構(gòu)包括“姓名”、“課程名”和“成績(jī)”等三個(gè)字段，表內(nèi)容為90分

以上（包括90分）或不及格的所有學(xué)生記錄。所建查詢名為“qT4”。

要求：

1、所建新表中的記錄按照“成績(jī)”降序保存。

2、創(chuàng)建此查詢后，運(yùn)行該查詢，并查看運(yùn)行結(jié)果。

15.3

請(qǐng)?jiān)凇按痤}”菜單下選擇相應(yīng)命令，并按照題目要求完成下面的操作，具體 要求如下：

注意：下面出現(xiàn)的“考生文件夾”均為考生文件夾

考生文件夾下存在一個(gè)數(shù)據(jù)庫(kù)文件“samp3.accdb”，里面已經(jīng)設(shè)計(jì)好表對(duì) 象“tBook”、“tDetail”、“tEmp”和“tOrder”，查詢對(duì)象“qSell”，窗 體對(duì)象“fEmp”。同時(shí)還設(shè)計(jì)出以“qSell”為數(shù)據(jù)源的報(bào)表對(duì)象“rSell”。請(qǐng)?jiān)诖嘶A(chǔ)上按照以下要求補(bǔ)充“fEmp”窗體和“rSell”報(bào)表的設(shè)計(jì)：

（1）將“rSell”報(bào)表標(biāo)題欄上的顯示文本設(shè)置為“銷售報(bào)表”；對(duì)報(bào)表中

名稱為“txtNum”的文本框控件進(jìn)行適當(dāng)設(shè)置，使其顯示每本書的售

出數(shù)量；在報(bào)表適當(dāng)位置添加一個(gè)計(jì)算控件（控件名稱為“txtC2”），計(jì)算各出版社所售圖書的平均單價(jià)。

說明：報(bào)表適當(dāng)位置指報(bào)表頁(yè)腳、頁(yè)面頁(yè)腳或組頁(yè)腳。

要求：計(jì)算出的平均單價(jià)使用函數(shù)保留兩位小數(shù)。

（2）在“fEmp”窗體頁(yè)眉節(jié)區(qū)添加一個(gè)標(biāo)簽，標(biāo)簽名為“bTitle”，顯示

文本為“雇員基本情況查詢”，字號(hào)為26。

（3）將“fEmp”窗體中命令按鈕（名稱為“CmdRefer”）上的文字顏色改

為褐色（褐色代碼為#7A4E2B）、字體粗細(xì)改為“加粗”、文字下方顯

示“下劃線”。

（4）將“fEmp”窗體中窗體頁(yè)眉節(jié)區(qū)控件的Tab鍵移動(dòng)次序設(shè)置為：“

TxtDetail”→“CmdRefer”。

（5）試根據(jù)以下窗體功能要求，補(bǔ)充已給的事件代碼，并運(yùn)行調(diào)試。

在“fEmp”窗體的窗體頁(yè)眉節(jié)區(qū)有一個(gè)文本框控件和一個(gè)命令按鈕，名稱 分別為“TxtDetail”和“CmdRefer”；在主體節(jié)區(qū)有多個(gè)文本框控件，顯示 “tBook”表中的相關(guān)信息。在“TxtDetail”文本框中輸入具體值后，單擊“ CmdRefer”命令按鈕。如果“TxtDetail”文本框中沒有值，則顯示提示框，提示文字為“對(duì)不起!未輸入雇員姓名，請(qǐng)輸入！”；如果“TxtDetail”文

本框中有值，則在“tBook”表中進(jìn)行查找，如果找到了相應(yīng)記錄，則顯示在 主體節(jié)對(duì)應(yīng)的文本框控件中,如果沒有找到，則顯示提示框，提示框顯示標(biāo)題 為“查找結(jié)果”，提示文字為“對(duì)不起!沒有這個(gè)雇員!”，提示框中只有一個(gè) “確定”按鈕，然后清除“TxtDetail”文本框中的內(nèi)容，并將光標(biāo)置于“ TxtDetail”文本框中。

注意：不允許修改報(bào)表對(duì)象“rSell”中未涉及的控件、屬性；不允許修 改表對(duì)象“tBook”、、“tDetail”、“tEmp”和“tOrder”，不允許修改 查詢對(duì)象“qSell”。不允許修改窗體對(duì)象“fEmp”中未涉及的控件、屬性和

任何VBA代碼；只允許在“*****Add*****”與“*****Add*****”之間的空行 內(nèi)補(bǔ)充一條代碼語(yǔ)句、不允許增刪和修改其它位置已存在的語(yǔ)句。

第五篇：VB上機(jī)試題及答案

上機(jī)操作練習(xí)題

1．某數(shù)組有20個(gè)元素，其值為隨機(jī)產(chǎn)生的兩位整數(shù)。現(xiàn)要求將前10個(gè)元素與后10個(gè)元素對(duì)換。即第1個(gè)元素與第20個(gè)元素互換，第2個(gè)數(shù)與第19個(gè)元素互換，…，第10個(gè)元素與第11個(gè)元素互換。在窗體上輸出數(shù)組原來(lái)各元素的值與對(duì)換后各元素的值。

Option explicit Dim a(1 to 20)as integer, I as integer, j as integer, t as integer Private Sub Form_Load()Show Print “原始數(shù)組是：” Randomize For i = 1 To 20

a(i)= Int(Rnd * 90)+ 10

Print a(i);If i Mod 10 = 0 Then Print Next i Print Print “現(xiàn)在數(shù)組是：” For i = 1 To 10

j = 211

a(k)= a(k + 1)

Next k

ReDim Preserve a(UBound(a)1 End If i = i + 1 Loop While(i <= UBound(a))If flag = False Then MsgBox n & “不在該數(shù)組中” Else Print “刪除” & n & “后的數(shù)組是:” For i = 0 To UBound(a)Print a(i);Next i End If End Sub 3．?dāng)?shù)組a中存放著升序排列的數(shù)據(jù)，使用array賦值，將inputbox輸入的新數(shù)插入到數(shù)組中，插入后數(shù)組仍有序。

注意：要求利用動(dòng)態(tài)數(shù)組，能夠?qū)崿F(xiàn)多次插入 Private Sub Form_Load()Show n = 8: ReDim a(n)a = Array(5, 15, 23, 52, 68, 88, 90, 99)n = n + 1: ReDim Preserve a(n)m = InputBox(“請(qǐng)輸入要插入的數(shù)據(jù):”)For i = 1 To n1)Next k a(k)= m For i = 1 To n

Print a(i);Next i Print End Sub 4．6個(gè)評(píng)委為4位歌手打分，分?jǐn)?shù)介于1-100之間。去掉一個(gè)最高分，一個(gè)最低分，求出每位選手的最后得分。將4位歌手得分從高到低排列輸出，同時(shí)輸出該選手的編號(hào)。

如：

歌手3 95分 歌手 1 87分 歌手 4 80分 歌手 2 70分

/ 19

Option Base 1

Private Type geshou

xuhao As String

fenshu(6)As Integer

score As Integer

pingjun As Integer End Type Dim singer(1 To 4)As geshou Private Sub Command1_Click()For i = 1 To 4 For j = 1 To 6

singer(i).fenshu(j)= Int(Rnd * 100)

singer(i).xuhao = “歌手” & i Next Next Call paixu End Sub

Private Sub paixu()Dim p As geshou For i = 1 To 4

For j = 1 To 5

For k = j To 6

If singer(i).fenshu(j)> singer(i).fenshu(k)Then

t = singer(i).fenshu(j)

singer(i).fenshu(j)= singer(i).fenshu(k)

singer(i).fenshu(k)= t

End If

Next

Next Next For i = 1 To 4 For j = 2 To 5

singer(i).score = singer(i).score + singer(i).fenshu(j)Next singer(i).pingjun = singer(i).score / 4 Next

For i = 1 To 3 For j = i To 4

If singer(i).score < singer(j).score Then

p = singer(i): singer(i)= singer(j): singer(j)= p

End If Next

/ 19

Next For i = 1 To 4 Print singer(i).xuhao & “得分：” & singer(i).pingjun Next End Sub Private Sub Form_Load()End Sub 10個(gè)評(píng)委給10個(gè)選手打分 Private Sub Form_Load()Show n = UBound(b)For i = 1 To 10

For j = 1 To 10

a(i, j)= Val(InputBox(“請(qǐng)第” & j & “位評(píng)委給第” & i & “位選手打分：”))Next j Next i For i = 1 To 10

max = a(i, 1): sum = 0

min = a(i, 1): ave = 0

For j = 1 To 10

If a(i, j)> max Then max = a(i, j)

If a(i, j)< min Then min = a(i, j)

sum = sum + a(i, j)

Next j

ave =(summin)/(n1

For j = i + 1 To n

If b(i)< b(j)Then

t = b(i): b(i)= b(j): b(j)= t

End If

Next j Next i Print “選手的得分由高到低為：” For i = 1 To 10

Print b(i);Next i End Sub 5．編寫函數(shù)求一元二次方程ax2+bx+c=0的解。

注意：要求考慮方程有兩相等實(shí)根、兩不等實(shí)根和兩個(gè)虛根的情況。Dim a As Single, b As Single, c As Single Dim s As Single a = InputBox(“請(qǐng)輸入a”)

/ 19

b = InputBox(“請(qǐng)輸入b”)c = InputBox(“請(qǐng)輸入c”)s = b ^ 2Sqr(s))/ 2 * a End If End Sub 6.任意輸入一組字符，統(tǒng)計(jì)出大寫字母多少個(gè)，小寫字母多少個(gè)，數(shù)字多少個(gè)？要求用過程實(shí)現(xiàn)。

Call tongji(a, n, m, o)Print “數(shù)字：” & n & Chr(13)& “小寫：” & m & Chr(13)& “大寫：” & o End Sub Private Sub tongji(a As String, n As Integer, m As Integer, p As Integer)For i = 1 To Len(a)If Asc(Mid(a, i, 1))> 47 And Asc(Mid(a, i, 1))< 58 Then

n = n + 1 ElseIf Asc(Mid(a, i, 1))> 96 And Asc(Mid(a, i, 1))< 123 Then

m = m + 1 ElseIf Asc(Mid(a, i, 1))> 64 And Asc(Mid(a, i, 1))< 91 Then

p = p + 1 End If Next End Sub 7．隨機(jī)產(chǎn)生一個(gè)5*5的矩陣，將主對(duì)角線和次對(duì)角線元素都置為1，并求出矩陣的四周元素之和，顯示在列表框中。

Option Base 1 Private Sub Form_Load()Dim a(5, 5)As Integer Dim s As Integer For i = 1 To 5 For j = 1 To 5

If i = j Or i = 6Asc(Mid(s1, i, 1))+ 64)ElseIf Asc(Mid(s1, i, 1))< 123 And Asc(Mid(s1, i, 1))> 96 Then convert = convert & Chr(1235: g = e

For j = 1 To n

If j > i Then

a(i, j)= 0

Else

If i = j Then

a(i, j)= 1

Else

a(i, j)= a(i1, ji + 1);String(2 *(i1)/ 2 To 1 Step(-1)

c = c + 1

s = Chr(64 + ii + c + 1);String(2 *(j1)/ 2 Else

x = x / 2 End If i = i + 1 Loop

ReDim Preserve a(UBound(a))If y < 0 Then For i = 1 To UBound(a)convert = convert & a(i)Next convert = “-” & convert Else For i = 1 To UBound(a)

/ 19

convert = convert & a(i)Next End If

End Function Private Sub Command1_Click()Dim y As Integer Text1.Text = “" y = InputBox(”請(qǐng)輸入十進(jìn)制數(shù)字“)Text1.Text = convert(y)

End Sub

Private Sub Form_Load()

End Sub 14．輸入一個(gè)整數(shù)N，產(chǎn)生N個(gè)隨機(jī)數(shù)（范圍1—10*N），然后采用任何2種算法實(shí)現(xiàn)由小到大的排序。將排序前后的數(shù)據(jù)顯示出來(lái)。

Option Base 1 Private Sub Command1_Click()Dim a()As Integer, n As Integer n = InputBox(”請(qǐng)輸入數(shù)列項(xiàng)數(shù)“)ReDim a(n)For i = 1 To n

a(i)= Int(Rnd * 10 * n + 1)

Print a(i);Next Print ReDim Preserve a(n)For i = 1 To n1 For j = 1 To n2)+ fact(n2 s = s1 + s2: t = s2: s2 = s: s1 = t Next End Function

Private Sub Command2_Click()n = InputBox(”請(qǐng)輸入n“)Print s(n)End Sub 17.編寫2個(gè)函數(shù)，分別采用遞歸法和遞推法求斐波納契數(shù)列的第n個(gè)月的兔子數(shù)，n使用inputbox輸入，調(diào)用函數(shù)的結(jié)果在窗體上顯示。Private Sub Command1_Click()List1.Clear Dim i As Integer For i = Val(Text1.Text)To Val(Text2.Text)If isprime(i)= True Then

List1.AddItem(i)

c = c + 1

If i Mod 10 = 9 Then

/ 19

List1.Selected(c1 If n Mod i = 0 Then

isprime = False

Exit For End If Next End Function 18 Dim sum As Long Private Sub Command1_Click()

Dim i As Integer, j As Integer, a(40)As Long

a(1)= 1

a(2)= 1

For i = 3 To 40

a(i)= a(i2)

Next i

sum = 0

For j = 1 To 40

sum = sum + a(j)

Next j End Sub

Private Sub Command2_Click()

Open ”out18.txt“ For Output As #1

Print #1, ”數(shù)列1，1，2，3，5，8…的前四十項(xiàng)的之和是：“

Print #1, sum

Close #1 End Sub 1.百錢買百雞

Option Explicit

Private Sub Command1_Click()Dim a As Integer, b As Integer For a = 1 To 34

For b = 1 To 20

If 3 * a + 5 * b +(100b)/ 3 = 100 Then

/ 19

Print a;

Print b;

Print 100b

End If

Next b Next a End Sub 2.分錢作業(yè)

Private Sub Command1_Click()Dim a As Single,b as single,c as single a = Text1.Text b = Fix(a / 100)Print ”100元：“;Print b c = ab * 50

b = Fix(c / 20)Print ”20元：“;Print b c = c0.05 * b b = Fix((c + 0.005)/ 0.02)Print ”0.02元：“;Print b c = c1

If a(i)= a(j)Then

GoTo aaa

End If

Next j

Next i For i = 1 To 10

Print a(i);Next i Print End Sub

Private Sub Command2_Click()Dim i As Integer, j As Integer, t As Integer For i = 1 To 9

For j = 1 + i To 10

If a(i)> a(j)Then

t = a(j)

a(j)= a(i)

a(i)= t

End If

Next j Next i For i = 1 To 10

Print a(i);Next i Print

End Sub

Private Sub Command3_Click()Dim i As Integer, j As Integer, t As Integer For i = 1 To 9

For j = 1 To 10c)> 10 ^(-5)i =(a + b)/ 2

If i ^ 2c = 0 Then

Exit Do

Else

a = i

End If Loop MsgBox(i)End Sub 7.閏年

Option Explicit

Private Sub 計(jì)算_Click()Dim i As Integer i = InputBox(”請(qǐng)輸入一個(gè)年份“)If i Mod 4 = 0 And i Mod 400 = 0 Then

If i Mod 100 <> 0 Then

MsgBox ”NOT“

Else

MsgBox ”YES“

End If Else

MsgBox ”NOT“ End If

End Sub 8.三角

Option Explicit Private Sub Command1_Click()

/ 19

Dim a As Single Dim b As Single Dim c As Single Dim p As Single Dim s As Single

a = Text1.Text b = Text2.Text c = Text3.Text

p =(a + b + c)/ 2

s = Sqr((pb)* p +(p1

If n Mod i = 0 Then

MsgBox ”NOT“

Exit For

End If Next i If i = n Then

MsgBox ”YES“ End If End Sub

Private Sub Command2_Click()

Dim a As Boolean, n As Double, i As Double a = False n = InputBox(”請(qǐng)輸入一個(gè)數(shù)：“)For i = 2 To n-1

If n Mod i = 0 Then

a = True

Exit For

End If Next i If a = True Then

/ 19

MsgBox ”NOT“ Else

MsgBox ”YES“ End If End Sub

Private Sub Command3_Click()Dim n As Double, i As Double n = InputBox(”請(qǐng)輸入一個(gè)數(shù)：“)i = 2 Do While i < n

If n Mod i = 0 Then

MsgBox ”NOT“

Exit Do

End If i = i + 1 Loop If i = n Then

MsgBox ”YES“ End If End Sub

Private Sub Command4_Click()Dim n As Double, i As Double, sushu As Boolean n = InputBox(”請(qǐng)輸入一個(gè)數(shù)：“)i = 2 sushu = True Do While i < n And sushu = True

If n Mod i = 0 Then

sushu = False

End If i = i + 1 Loop If sushu = True Then

MsgBox ”YES“ Else

MsgBox ”NOT" End If End Sub

/ 19