3[簡答題]

　　在考生文件夾下有一個數據庫文件“samp3.accdb”，里面已經設計了表對象“tEmp”、查詢對象“qEmp”和窗體對象“fEmp”。同時，給出窗體對象“fEmp”上兩個按鈕的單擊事件代碼，請按以下要求補充設計。

　　(1)將窗體“fEmp”上名稱為“tSS”的文本框控件改為組合框控件，控件名稱不變，標簽標題不變。設置組合框控件的相關屬性，以實現從下拉列表中選擇輸入性別值“男”和“女”。

　　(2)選擇合適字段，將查詢對象“qEmp”改為參數查詢，參數為引用窗體對象“fEmp”上組合框“tSS”的輸入值。

　　(3)將窗體對象“fEmp”上名稱為“tPa”的文本框控件設置為計算控件。要求依據“黨員否”字段值顯示相應內容。如果“黨員否”字段值為Tme，顯示“黨員”兩個字;如果“黨員否”字段值為False，顯示“非黨員”3個字。

　　(4)在窗體對象“fEmp”上有“刷新”和“退出”兩個命令按鈕，名稱分別為“bt1”和“bt2”。單擊“刷新”按鈕，窗體記錄源改為查詢對象“qEmp”;單擊“退出”按鈕，關閉窗體。現已編寫了部分VBA代碼，請按VBA代碼中的指示將代碼補充完整。

　　注意：不要修改數據庫中的表對象“tEmp”;不要修改查詢對象“qEmp”中未涉及的內容;不要修改窗體對象“fEmp”中未涉及的控件和屬性。

　　程序代碼只允許在“*****Add****”與“*****Add*****”之間的空行內補充一行語句、完成設計，不允許增刪和修改其他位置已存在的語句。

　　參考解析：【考點分析】本題考點：窗體中文本框、命令按鈕、組合框控件屬性和查詢的設置等。 【解題思路】第1、3小題在窗體的設計視圖中通過用鼠標右鍵單擊該控件，從彈出的快捷菜單中選擇“屬性”命令，設置屬性;第2小題在查詢設計視圖中設置參數;第4小題直接用鼠標右鍵單擊控件，從彈出的快捷菜單中選擇“事件生成器”命令，輸入代碼。

　　(1)【操作步驟】

　　步驟1：選擇“窗體”對象，右鍵單擊“tEmp”，從彈出的快捷菜單中選擇“設計視圖”命令。

　　步驟2：右鍵單擊控件“tSS”，從彈出的快捷菜單中選擇“更改為”下的“組合框”命令，然后右鍵單擊“tSS”，從彈出的快捷菜單中選擇“屬性”命令，在“行來源類型”和“行來源”行分別輸入“值列表”和“男;女”，如圖3.329所示，關閉屬性表，按Ctrl+s保存修改，關閉設計視圖。

　　(2)【操作步驟】

　　步驟1：選擇“查詢”對象，右鍵單擊“qEmp”，從彈出的快捷菜單中選擇“設計視圖”命令。

　　步驟2：雙擊“*”和“性別”字段，添加到字段行，在“性別”字段的“條件”行輸入“[forms]![fEmp]![tSS]”。如圖3.330所示。

　　步驟3：按Ctrl+S保存修改，關閉設計視圖。

　　(3)【操作步驟】

　　右鍵單擊窗體對象“fEmp”，打開設計視圖，右鍵單擊文本框“tPa”，從彈出的快捷菜單中選擇“屬性”命令，在“控件來源”行輸入“=IIf([黨員否]=True，”黨員”，”非黨員”)”，關閉屬性表，如圖3.331所示.

　　(4)【操作步驟】

　　步驟1：右鍵單擊命令按鈕“刷新”，從彈出的快捷菜單中選擇“事件生成器”命令，在彈出的對話框中選擇“代碼生成器”，進入編程環境，在空行輸入以下代碼：

　　'* * * * * * Add1 * * * * * * Form.RecordSource=”qEmp’’'* * * * * * Add1 * * * * * * 關閉界面。

　　步驟2：右鍵單擊命令按鈕“退出”，從彈出的快捷菜單中選擇“事件生成器”命令，在彈出的對話框中選擇“代碼生成器”，進入編程環境，在空行內輸入以下代碼：

　　'* * * * * * Add2 * * * * * *

　　DoCmd.Close

　　'* * * * * * Add2 * * * * * *

　　如圖3.332所示，關閉界面。

　　步驟3：按Ctrl+S保存修改，關閉設計視圖。

　　【易錯提示】添加代碼時要選擇正確的函數類型。

掃描/長按二維碼幫助考試通關

2017等考各科真題答案

2017等考各科通關技巧

2017各科最新預測試卷

2017等考成績查詢時間

微信搜索"考試吧"了解更多考試資訊、下載備考資料

　　相關推薦：

　　2017年全國計算機等級考試時間|教材目錄（2017年版）

　　2017年9月計算機等級考試真題|計算機等級考試答案

　　2017年計算機等級考試備考經驗及應試技巧匯總

　　2017全國計算機等級考試考前必做試題及答案匯總

　　各地2017年9月計算機等考成績查詢時間|免費查分提醒

　　計算機等級考試成績評定流程及標準|合格證書樣本及證書說明

　　歷年真題匯總|考試吧特別策劃：2017年計算機等級考試報考指南