1、四川省普通咼校職教師資班和咼職班對口招生統一考試信息技術一類Access模擬試題（三）（考試時間80分鐘，滿分150分）學校：長寧縣職業技術學校班級：姓名：成績:、單項選擇題（每題 2分，共40分）1.要設置報表的頁碼，正確的操作區域是 （）。A.報表頁眉/報表頁腳B.頁面頁眉/頁面頁腳C.組頁眉/組頁腳D.主體2.以下控件中，可作為綁定型控件的是A.標簽B.命令按鈕C.組合框D.圖像3.以下報表不能完成的操作是 （A.數據排序B.數據分組C.數據匯總D.數據修改4.以下不是報表視圖的是（)°A.設計視圖B.數據表視圖C.布局視圖D.打印預覽視圖5.用來顯示窗體綁定數據源字段值的控件

2、類型是A.綁定型 B. 未綁定性 C.計算型D.關聯型6.在報表向導中，排序的字段數量不得超過（A. 1 B.C.D.107.在窗體中可以包含一列或幾列數據，用戶只能選擇不能手動輸入的控件是A.標簽 B. 文本框C.組合框 D. 列表框8.要使窗體上文本框內輸入數據時達到“*”的效果，應設置的屬性是A.輸入掩碼B. 密碼C.樣式D.記錄源9.在窗體視圖中，要使窗體一頁顯示多條記錄，需要設置默認視圖屬性為A.單個窗體 B.連續窗體C.數據透視表D.分隔窗體A.條件 B.命令按鈕 C.操作參數D.運行方式13. 在VBA中，如果一行代碼過長想要分兩行顯示，應使用（）分隔A.下劃線 B.冒號C.單引

3、號D.不能分隔14. 如果要創建快捷鍵運行宏，則需要將宏名設置為（）A.AutoKeysB.AutoC.AutoExecD.ExecKeys15. 以下函數中，不是返回數字的是（）A. YearB. Le nC. ChrD. I nStr16. 假如消息框中彈出“確定”和“取消”按鈕，單擊取消按鈕后，Msgbox的返回值為:A. 1 B. 2 C.3 D. 417. 函數Inputbox返回值的數據類型為（）。A.字符型B. 數字型 C. 日期時間型 D.視輸入而定18. 當為cj變量輸入75以后，語句llf（cj>=80,優秀”，lif（cj>=70,良好”，IIF（cj>

4、=60,及格”所返回的結果是（）A.優秀 B.良好 C.及格 D.不及格19. 有如下代碼：Private Sub Comma nd1_Click（）Static x As In tegerx=0x=x+1End Sub當點擊按鈕三次以后，x的值為：A. 0 B. 1C.2 D. 320. 下列Select.Case.End Slelect語句中，Case語句條件不合法的是 （）A. 3,7,9 B. 5,Is>=8 C. 7 To 10 D. Is>=8 And ls<=12不及格”）10.將窗體從設計視圖轉到窗體視圖，則首先觸發的事件是A. Load 事件 B. Open

5、事件C. Click 事件D. Timer事件11.彈出消息框的宏操作是（A. MsgboxB.DoCmd.Msgbox一、多項選擇題（5X 3=15 分)21.在窗體視圖中，能夠看到（:）節的內容A.窗體頁眉B.窗體貝腳C.頁面頁眉D.頁面頁腳22.下列關于宏的敘述中，正確的有（)C. MessageBoxD.DoCmd.MessageBox12.創建宏時至少要定義一個宏操作，并要設置對應的)°A. 可以使用宏組來管理一系列相關的宏B. Access 2010中的宏操作可以轉換為 VBA代碼A. Str-NameB. Case ifC. 6A D.變量 1F列表達式中，可判斷x能夠

6、被y整除的有（A. In t(x / y)= x yB. x Mod y =0C. x / y = x yD. Fix(x / y) = x y23.24.25.、26.27.28.29.30.31.32.33.34.35.三、36.37.38.39.C. 在條件宏中，不能引用窗體中控件的值D. 宏不能修改其本身以下運算結果為真的有（）A、56 mod 3 A2 >=2B、348 * 2人3>54 and 98 mod 3 =2C、89 mod 45 mod 24-5人2 >=0 or not 9人2 mod 3 >0D、not 2人6 mod 3>2 and 9

7、*9=81以下變量名合法的有（判斷題（10X 2=20分）報表中的組頁眉和組頁腳節可以單獨添加；報表中的數據源可以來自一個表，也可以來自多個表；報表是一種十分有用的工具，利用向導創建報表可以根據用戶的意愿直接創建出各種精美的報 表;在Access 2010中，窗體的視圖共 5種：設計視圖、窗體視圖、數據透視表視圖、數據透視圖視圖和布局視圖；在窗體運行的過程中，可以設置控件的屬性；利用設計視圖創建窗體是最為靈活的一種方式，用戶可根據需要設計出各種類型的窗體；在為宏設置條件時，一個條件只能執行一個宏操作；在窗體控件的事件屬性中可以使用宏組名.宏名的方式來調用宏組；若變量dk定義為日期型，數據 #3

8、01-1-5#可以對該變量賦值；當常量被定義后，還可以根據程序需要重新對其進行直接賦值；填空題。（20 X 2=40分）要在報表上顯示格式為“ 4/總15頁”的頁碼，則計算控件的控件來源應設置為 。報表的數據源可以是表和 ；在Access 2010中，使用自動創建的報表是 報表；在報表中，若要對“學號”進行統計個數，應設置文本框的數據來源的表達式為 40. 計算型控件使用 作為數據源；41. 窗體將窗體中的一個顯示記錄按列分隔，每列的左邊顯示字段，右邊顯示字段內容等；42. 要創建窗體必須先設置數據源之間的關系；43. 是窗體上用于顯示數據、執行操作、裝飾窗體的對象；44. 如果希望對所有的宏

9、命令進行調試，應在宏設計器中單擊功能區“設計”選項卡上的按鈕，然后再點擊運行按鈕；45. 在VBA中要將數組的默認下標下限設置為1,應在通用聲明區域編寫 語句；46. 函數表達式Fix（-7.2）的運算結果為： ；47. 表達式日 豐0 轉換成 Access的表達式是。48. 函數In Str （2, “學生學籍管理系統”，”學”）的結果是 。49. VBA中符合結構化原則的三種基本控制結構是：順序結構、循環結構和。；50. VBA語句Dim a%中，聲明變量a的數據類型為 型。51. 如果某變量的取值只有真值或者假值，則應該變量聲明為 數據類型；52. 有 VBA 語句 str1 = ”52

10、510”： x = Val（Mid（str1,1,2） + Left（str1,1），當代碼運行后 x 的結果為；53. 在VBA中的通用聲明區域使用Dim或Private關鍵字的變量被稱為 變量；54. 在VBA中，Timerlnterval （計時器間隔）屬性的時間單位是 ；55. 在VBA中，窗體的 事件會根據Timerlnterval屬性所設置的時間間隔，重復執行該事件的代碼。四、綜合題（35分）56. 當單擊按鈕Comma nd后，消息框輸出的內容為： （3分）Private Sub Comma nd0_Click（）Dim a As In teger, b As In tegera

11、 = 10 : b = 10MsgBox fun （a, b） & ”，” & bEnd SubFunction fun （ByVai m As In teger, n As In teger） As In tegerDim i As In tegerfun = 1For i = 1 To m Step 3fun = fun * iNext in = fun m * iEnd Function57. 程序填空(每空2分，共22分)。有表和窗體如圖所示，用于實現對用戶的登錄和注冊功能。(1)登錄功能：如果輸入的賬號和密碼能夠與User表內的記錄相匹配，則彈出“登錄成功!n = M

12、sgBox(" 用戶名或者密碼不正確！您還有 ” & 3 - k & ”次嘗試機會。”，vbCritical,II+ t |警告！ 丿If ThenMsgBox "錯誤已達最大次數，系統將強制關閉窗體!DoCmd.CloseEnd IfEnd If的消息框，否則彈出“用戶名和密碼不正確！您還有n次嘗試機會”的消息框；如果錯誤次數達到3次，則系統強制關閉窗體。-useru_id'u_accDimt、r u_pffd " u_name "1 admin*系統菅理員|zhanga.ing出碼:1星9 了titmm張明登靈注獲31ihon

13、gJEnd Sub(2) 如下圖所示，該窗體實現的功能為用戶注冊，窗體中的四個文本框從上到下依次為TextO,Text2,Text4,Text6煒尸名或魯密再夂止佛!怒胚看丄次塞試機養。wkE代碼如下：【登錄按鈕代碼】Private Sub Comma ndO_Click()Dim UserAccou nt As Stri ng, UserPwd As Stri ngk As In tegerUserAccou nt = Me.TextOUserPwd = Me.Text2If ("u_pwd", "user", "u_account=&quo

14、t;' & UserAccount & ""') = Thenn = MsgBox("登錄成功！ ", vbI nformatio n," 提示")Elsek =注冊功能描述如下：如果任意一個文本框內容為空，則彈出消息框提示；在所有內容都確保輸入的前提下，再次檢測兩次輸入的密碼是否一致，如果不一致,則彈出消息框提示；以上兩項都滿足的前提下，判斷賬號是否在user表中存在，如果存在，則不允許保存，并彈出消息框提示“該賬號已經存在！”，并輸出該賬號在user表中對應的用戶姓名。只有滿足以上三項的全部條件，則

15、向user表添加用戶信息。【注冊按鈕代碼】Private Sub Comma nd1_Click()If Nz(Me.TextO) = "" Or Nz(Me.Text2) = "" Or Nz(Me.Text4) = "" Or Nz(Me.Text6) = "" The nMsgBox "所有文本框的內容不能為空！”ElseIf The nMsgBox "兩次輸入的密碼不一致！”ElseDim db As DatabaseDim rs As RecordsetSet db = _Set rs

16、 = db.("select * from user where u_accou nt="' & Me.TextO &"'")If > 0 The nMsgBox "賬號已經存在，注冊該賬號的用戶姓名為：” & ElseDim In sertSQL As Stri ngIn sertSQL = "insert into user(u_acco un t,u_pwd,u_ name) values('" & Me.TextO &"','"& Me.Text4 & "','" & Me.Text6 & "')"(In sertSQL)MsgBox "用戶信息注冊并保存成功！”End IfEnd IfEnd IfEnd Sub58.程序填空(10分，每空2分)以下代碼的功能是：單擊按鈕Comma nd后產生20個兩位隨機整數存于數組之中，打印數組中大于50的數，并