43考生文件夾下存在一個數據庫文件“samp3.accdb”,里面已經設計好表對象“tEmployee”和查詢對象“qEmployee”,同時還設計出以“qEmployee”為數據源的報表對象“rEmployee”。試在此基礎上按照以下要求補充報表設計。
(1)在報表的合適頁腳區域添加一個計算控件,以輸出頁碼。計算控件放置在距上邊0.3厘米、距左側7厘米位置,并命名為“tPage”。規定頁碼顯示格式為“當前頁/總頁數”,如l/20、2/20….、20/20等。
(2)報表的報表頁眉節區位置添加一個標簽控件,其標題顯示為“Employee基本信息”,字號為24,并命名為“bTitle”。
(3)在相關事件代碼中,設置報表標題為引用標簽“bTitle”的值。同時,將其中的英文內容部分大寫輸出。
(4)在相關事件代碼中,依據報表“聘用時間”字段值情況,設置報表文本框“tStatus”的輸出內容。具體規定是:截止2012年,聘用期在30年(含)以上的員工,輸出“老員工”標示信息;否則,輸出“普通員工”標示信息。
注意:不允許修改數據庫中的表對象“tEmployee”和查詢對象“qEmployee”;不允許修改報表對象“rEm—ployee”中未涉及的控件和屬性;代碼只允許在“*****Add*****”與“*****Add*****”之間的空行內補充一條語句、完成設計。
參考解析:
【考點分析】本題考點:在報表中設置增加控件,設置貞
碼,VBA編碼。
【解題思路】第1、2小題在報表的設計視圖里增加控件,并對控件屬性進行設置;第3小題直接右鍵單擊報表選擇器,選擇屬性,設置加載事件,在VBA代碼編輯頁面實現代碼編輯。第4小題通過條件函數對控件數據來源進行設置。
(1)【操作步驟】
步驟l:雙擊打開“samp3.accdb”數據庫,選擇“報表”對象,右鍵單擊“rEmployee”報表,從彈出的快捷菜單中選擇“設計視圖”命令,打開報表的設計視圖。
步驟2:展開“頁面頁腳”節區,選擇“設計”選項卡F“擰件”組中的“文本框”控件,單擊“頁面頁腳”節區任一點,彈出“Text”標簽和“未綁定”文本框。
步驟3:選中“Text”標簽,按住鍵盤上的“Delete”鍵,刪除“Text”標簽;右鍵單擊“未綁定”文本框,從彈出的快捷菜單中選擇“屬性”命令,單擊“全部”選項卡,在該選項卡的“名稱”行中輸入“tPage”,在“控件來源”行中輸入“一LPage]&”/”&[Pages]”,在“上邊距”行中輸入“0.3cm”,在“左”行中輸入“7cm”。
步驟4:單擊快速工具欄中的“保存”按鈕,然后關閉“屬性表”。
(2)【操作步驟】
步驟l:展開報表頁眉節區,選擇“設計”選項卡下“控件”組中的“標簽”控件,單擊報表頁眉節區任一點,出現標簽控件,單擊標簽控件并輸入“Employee基本信息”,右鍵單擊該標簽控件,從彈出的快捷菜單中選擇“屬性”命令,打開“屬性表”對話框,在該對話框的“全部”選項卡下的“名稱”行中輸入“bTitle”,在“字號”行中輸入“24”。
步驟2:單擊快速工具欄中的“保存”按鈕,然后關閉‘靄性表”。
(3)【操作步驟】
步驟l:雙擊標尺相交處的“報表選擇器”,彈出“屬性表”對話框,在該對話框中單擊“事件”選項卡,然后再單擊該選項卡下的“打開”行的事件生成器按鈕,進入VBA代碼編輯區。步驟2:在“’*****Addl*****”區域的空白行中輸入“Me.Caption—UCase(Me.bTitle.Caption)”。
(4)【操作步驟】
步驟l:在“*****Add2*****”區域的空白行處輸入“tStatus.ControlSource=”=Hf((2012一Year([聘用時間]))>一30,’老員工‘,’普通員工7)””。
步驟2:單擊快速工具欄中的“保存”按鈕,關閉VBA代碼編輯區。
步驟3:單擊快速工具欄中的“保存”按鈕。
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |