43考生文件夾下存在一個(gè)數(shù)據(jù)庫文件“samp3.accdb”，里面已經(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)表的合適頁腳區(qū)域添加一個(gè)計(jì)算控件，以輸出頁碼。計(jì)算控件放置在距上邊0.3厘米、距左側(cè)7厘米位置，并命名為“tPage”。規(guī)定頁碼顯示格式為“當(dāng)前頁/總頁數(shù)”，如l/20、2/20….、20/20等。

　　(2)報(bào)表的報(bào)表頁眉節(jié)區(qū)位置添加一個(gè)標(biāo)簽控件，其標(biāo)題顯示為“Employee基本信息”，字號(hào)為24，并命名為“bTitle”。

　　(3)在相關(guān)事件代碼中，設(shè)置報(bào)表標(biāo)題為引用標(biāo)簽“bTitle”的值。同時(shí)，將其中的英文內(nèi)容部分大寫輸出。

　　(4)在相關(guān)事件代碼中，依據(jù)報(bào)表“聘用時(shí)間”字段值情況，設(shè)置報(bào)表文本框“tStatus”的輸出內(nèi)容。具體規(guī)定是：截止2012年，聘用期在30年(含)以上的員工，輸出“老員工”標(biāo)示信息;否則，輸出“普通員工”標(biāo)示信息。

　　注意：不允許修改數(shù)據(jù)庫中的表對(duì)象“tEmployee”和查詢對(duì)象“qEmployee”;不允許修改報(bào)表對(duì)象“rEm—ployee”中未涉及的控件和屬性;代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內(nèi)補(bǔ)充一條語句、完成設(shè)計(jì)。

　　參考解析：

　　【考點(diǎn)分析】本題考點(diǎn)：在報(bào)表中設(shè)置增加控件，設(shè)置貞

　　碼，VBA編碼。

　　【解題思路】第1、2小題在報(bào)表的設(shè)計(jì)視圖里增加控件，并對(duì)控件屬性進(jìn)行設(shè)置;第3小題直接右鍵單擊報(bào)表選擇器，選擇屬性，設(shè)置加載事件，在VBA代碼編輯頁面實(shí)現(xiàn)代碼編輯。第4小題通過條件函數(shù)對(duì)控件數(shù)據(jù)來源進(jìn)行設(shè)置。

　　(1)【操作步驟】

　　步驟l：雙擊打開“samp3.accdb”數(shù)據(jù)庫，選擇“報(bào)表”對(duì)象，右鍵單擊“rEmployee”報(bào)表，從彈出的快捷菜單中選擇“設(shè)計(jì)視圖”命令，打開報(bào)表的設(shè)計(jì)視圖。

　　步驟2：展開“頁面頁腳”節(jié)區(qū)，選擇“設(shè)計(jì)”選項(xiàng)卡F“擰件”組中的“文本框”控件，單擊“頁面頁腳”節(jié)區(qū)任一點(diǎn)，彈出“Text”標(biāo)簽和“未綁定”文本框。

　　步驟3：選中“Text”標(biāo)簽，按住鍵盤上的“Delete”鍵，刪除“Text”標(biāo)簽;右鍵單擊“未綁定”文本框，從彈出的快捷菜單中選擇“屬性”命令，單擊“全部”選項(xiàng)卡，在該選項(xiàng)卡的“名稱”行中輸入“tPage”，在“控件來源”行中輸入“一LPage]&”/”&[Pages]”，在“上邊距”行中輸入“0.3cm”，在“左”行中輸入“7cm”。

　　步驟4：?jiǎn)螕艨焖俟ぞ邫谥械摹氨４妗卑粹o，然后關(guān)閉“屬性表”。

　　(2)【操作步驟】

　　步驟l：展開報(bào)表頁眉節(jié)區(qū)，選擇“設(shè)計(jì)”選項(xiàng)卡下“控件”組中的“標(biāo)簽”控件，單擊報(bào)表頁眉節(jié)區(qū)任一點(diǎn)，出現(xiàn)標(biāo)簽控件，單擊標(biāo)簽控件并輸入“Employee基本信息”，右鍵單擊該標(biāo)簽控件，從彈出的快捷菜單中選擇“屬性”命令，打開“屬性表”對(duì)話框，在該對(duì)話框的“全部”選項(xiàng)卡下的“名稱”行中輸入“bTitle”，在“字號(hào)”行中輸入“24”。

　　步驟2：?jiǎn)螕艨焖俟ぞ邫谥械摹氨４妗卑粹o，然后關(guān)閉‘靄性表”。

　　(3)【操作步驟】

　　步驟l：雙擊標(biāo)尺相交處的“報(bào)表選擇器”，彈出“屬性表”對(duì)話框，在該對(duì)話框中單擊“事件”選項(xiàng)卡，然后再單擊該選項(xiàng)卡下的“打開”行的事件生成器按鈕，進(jìn)入VBA代碼編輯區(qū)。步驟2：在“’*****Addl*****”區(qū)域的空白行中輸入“Me.Caption—UCase(Me.bTitle.Caption)”。

　　(4)【操作步驟】

　　步驟l：在“*****Add2*****”區(qū)域的空白行處輸入“tStatus.ControlSource=”=Hf((2012一Year([聘用時(shí)間]))>一30，’老員工‘，’普通員工7)””。

　　步驟2：?jiǎn)螕艨焖俟ぞ邫谥械摹氨４妗卑粹o，關(guān)閉VBA代碼編輯區(qū)。

　　步驟3：?jiǎn)螕艨焖俟ぞ邫谥械摹氨４妗卑粹o。

　　相關(guān)推薦：

　　2015年計(jì)算機(jī)二級(jí)考試《Acess》通關(guān)練習(xí)題匯總

　　2015年計(jì)算機(jī)二級(jí)《C語言》考前押題密卷匯總

　　2015計(jì)算機(jī)二級(jí)考試Access備考練習(xí)及答案匯總

　　2015年計(jì)算機(jī)二級(jí)考試ACCESS復(fù)習(xí)指導(dǎo)匯總