全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6) ,全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）

(2010.6)

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

一、單向選擇題（每題1分，共40分）

1．計算機系統(tǒng)中存儲信息的基本單位是______。

A) 位B) 字節(jié)C) 字D) 字符

2．超市使用的POS 機收費系統(tǒng)，屬于計算機在______方面的應(yīng)用。

A) 數(shù)據(jù)處理B) 科學(xué)計算C) 實時控制D) 計算機輔助設(shè)計

3．下面是PC 機常用的4種外設(shè)接口，其中U 盤、移動硬盤、MP3、MP4等均能連接的接口是______。

A) RS-232B) IEEE-1394C) USB D) IDE

4．下面各種進制的數(shù)據(jù)中，最大的數(shù)是______。

A) （1000010）2B) （67）10C) （77）8D) （3A ）16

5．下列關(guān)于Windows 操作系統(tǒng)通配符的說法中，正確的是______。

A) ? 代表多個字母B) *代表多個字母C) ? 代表任意多個字符D) *代表任意多個字符

6．某電子郵件地址為：wyg@163．com ，其中wyg 是______。

A) 域名B) 地區(qū)名C) 用戶名D) 國家名

7．多媒體計算機是指______。

A) 安裝了光驅(qū)并具有較高運算能力的計算機

B) 安裝了多種媒體播放軟件的計算機

C) 能夠處理音頻、視頻等多媒體信息的計算機

D) 能夠訪問Internet 的計算機

8．下列選項中，______不是有效的信息安全控制方法。

A) 用戶口令設(shè)置B) 用戶權(quán)限設(shè)置C) 數(shù)據(jù)加密D) 增加網(wǎng)絡(luò)寬帶

9．下列選項中，防止U 盤感染病毒的有效方法是______。

A) 對U 盤進行寫保護B) 對U 盤進行分區(qū)

C) 保持U 盤的清潔D) 不要與有病毒的U 盤方在一起

10．編程屬于軟件開發(fā)過程中的______階段。

A) 實現(xiàn)B) 定義C) 分析D) 維護

11．下列關(guān)于數(shù)據(jù)庫特點的描述中，錯誤的是______。

A) 數(shù)據(jù)庫中的數(shù)據(jù)與應(yīng)用程序有密切的聯(lián)系

B) 數(shù)據(jù)庫中的數(shù)據(jù)有較高的獨立性

C) 數(shù)據(jù)庫中的數(shù)據(jù)可以被多個應(yīng)用程序共享

D) 數(shù)據(jù)庫中的數(shù)據(jù)有較低的冗余性

12．關(guān)系數(shù)據(jù)庫中的一個關(guān)系就是一個______。

A) 數(shù)據(jù)庫B) 二維表C) 應(yīng)用程序D) 記錄

13．在一個關(guān)系中，能夠唯一標(biāo)識一個元組的屬性或?qū)傩缘慕M合稱為______。

A) 記錄B) 字段C) 域D) 關(guān)鍵字

14．在用戶根據(jù)自己的實際需要創(chuàng)建一個Access 數(shù)據(jù)庫時，通常應(yīng)該先______。

A) 創(chuàng)建一個空白的數(shù)據(jù)庫B) 創(chuàng)建好表，再由表組合成數(shù)據(jù)庫

C) 設(shè)計一個創(chuàng)建數(shù)據(jù)庫的應(yīng)用程序D) 定義好數(shù)據(jù)庫中各個表的關(guān)鍵字

15．以下關(guān)于字段的描述中，錯誤的是______。

A) 一個表中可以包含多種不同類型的字段

B) 設(shè)置字段的有效性規(guī)則，可防止非法數(shù)據(jù)輸入

C) 字段屬性主要包括字段名、數(shù)據(jù)類型和字段大小等

D) 字段名最長為128個字符

16．以下數(shù)據(jù)類型中，與貨幣型數(shù)據(jù)所占的存儲空間相同的是______。

A) 邏輯型B) 自動編號型C) 日期/時間型D) 備注型

17．以下關(guān)于文本類型的描述中，錯誤的是______。

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

A) 文本型數(shù)據(jù)一般由字母、數(shù)字或漢字組成

B) 文本型字段的大小默認(rèn)是50

C) 文本型字段最多可以存儲255個字符

D) 不能對文本型字段進行排序

18．如果字段內(nèi)容為聲音文件，該字段的數(shù)據(jù)類型一般定義為______。

A) 備注型B) OLE 對象型C) 文本型D) 數(shù)字型

19．在Access 中，以下關(guān)于字段默認(rèn)值的描述中，錯誤的是______。

A) 設(shè)置默認(rèn)值可以提高輸入數(shù)據(jù)的效率

B) 默認(rèn)值是輸入時自動填充的字段值

C) 數(shù)字型字段的默認(rèn)值被自動設(shè)置為0

D) 所有數(shù)據(jù)類型都具有默認(rèn)值屬性

20．在有相同字段C 的A 、B 兩個表中，C 字段均被設(shè)為主鍵，通過C 建立的是______。

A) 一對一的關(guān)系B) 一對多的關(guān)系C) 多對多的關(guān)系D) 多對一的關(guān)系

21．以下關(guān)于選擇查詢的描述中，錯誤的是______。

A) 可以從一個或多個表中檢索并顯示數(shù)據(jù)

B) 可以對記錄進行分組

C) 查詢結(jié)果不會隨表中記錄的變化而變化

D) 可以對記錄進行總計和計數(shù)等操作

22．將表A 中的記錄添加到表B 中，若要保持表B 中原有記錄，使用的查詢是______。

A) 更新查詢B) 生成表查詢C) 追加查詢D) 選擇查詢

23．創(chuàng)建一個選擇查詢，查找“學(xué)號”是“J0901”或“J0908”的學(xué)生信息，在設(shè)計視圖中與“學(xué)號”字段對應(yīng)的條件行中，一般設(shè)置為______。

A) “J0901”And “J0908”B) “J0901”O(jiān)r “J0908”

C) In （“J0901”And “J0908”）D) Not In （“J0901”And “J0908”）

24．日期/時間型常量應(yīng)該使用適當(dāng)?shù)姆指舴ㄆ饋?，正確的分隔符是______。

A) []B) “”C) #D) *

25．通過在對話框中輸入學(xué)號或姓名來查找相關(guān)學(xué)生信息，使用的查詢是______。

A) 選擇查詢B) 更新查詢C) 交叉表查詢D) 參數(shù)查詢

26．在教師信息表中有一邏輯型字段“是否黨員”，查找教師中的黨員使用的SQL 語句是______。

A) Select *Form 教師信息Where 是否黨員=“True ”

B) Select *Form 教師信息Where 是否黨員=True

C) Select *Form 教師信息While 是否黨員=“True ”

D) Select *Form 教師信息While 是否黨員=True

27．在Access 中，窗體的視圖不包括______。

A) 窗體視圖B) 設(shè)計視圖C) 數(shù)據(jù)表視圖D) 查詢視圖

28．在窗體中添加說明性文本，一般選用______控件。

A) 文本框B) 標(biāo)簽C) 列表框D) 矩形

29．使用______控件，可以連接數(shù)據(jù)源中的OLE 類型字段。

A) 主/子窗體B) 未綁定對象框C) 綁定對象框D) 復(fù)選框

30．在設(shè)計窗體時要實現(xiàn)命令按鈕的功能，一般先在屬性對話框中選擇______選項卡。

A) 格式B) 事件C) 數(shù)據(jù)D) 其它

31．窗體的設(shè)計視圖由多個部分組成，每部分稱為節(jié)，其中______節(jié)是必須有的。

A) 主體B) 窗體頁眉C) 頁面頁眉D) 窗體頁腳

32．在創(chuàng)建報表時，排序字段最多可以設(shè)置為______。

A) 3個B) 2個C) 1個D) 4個

33．使用報表進行匯總時，其匯總字段的數(shù)據(jù)類型一般為______。

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

A) 文本型B) 數(shù)字型C) 日期/時間型D) 備注型

34．以下關(guān)于報表頁眉和頁面頁眉的說法中，正確的是______。

A) 頁面頁眉只出現(xiàn)在報表開始的位置，報表頁眉位于每頁的最上部

B) 報表頁眉只出現(xiàn)在報表開始的位置，頁面頁眉位于每頁的最上部

C) 報表頁眉和頁面頁眉對整個報表來說，其顯示的效果是一樣的

D) 報表頁眉在報表的每頁出現(xiàn)一次，頁面頁眉在報表中只出現(xiàn)一次

35．啟動窗體時，系統(tǒng)首先執(zhí)行的事件過程是______。

A) Load B) Click C) UnLoad D) DblClick

36．?dāng)?shù)據(jù)訪問頁中的控件與窗體、報表中大致相同，但______控件是數(shù)據(jù)訪問頁特有的。

A) 文本框B) 復(fù)選框C) 滾動文字D) 標(biāo)簽

37．以下宏操作中，______命令用于打開選擇查詢。

A) OpenQuery B) OpenReport C) OpenForm D) OpenTable

38．以下關(guān)于程序的描述中，錯誤的是______。

A) 程序的設(shè)計與開發(fā)需要借助一定的工具軟件

B) 程序運行后應(yīng)該能夠解決特定的問題

C) 程序需要通過編譯或者解釋才能在計算機上運行

D) 程序可以在所有的計算機上直接運行

39．目前普遍使用的程序設(shè)計語言是______。

A) 面向機器的語言B) 面向過程的語言C) 面向?qū)ο蟮恼Z言D) 面向方面的語言

40．在Access 提供的VBA 開發(fā)環(huán)境中，可以通過______函數(shù)輸出程序的運行結(jié)果。

A) InputBox B) OutputBox C) MsgBox D) DispBox

二、填空題（每題2分，共30分）

1．?dāng)?shù)據(jù)庫是存儲在存儲介質(zhì)上的2．?dāng)?shù)據(jù)模型通常分為網(wǎng)狀模型、層次模型和3種類型。

3．在Access 數(shù)據(jù)庫中，存儲原始數(shù)據(jù)的對象是4．報表、查詢及窗體等對象可以通過向?qū)Ш?．在Access 中，按功能來劃分，索引可以分為6．函數(shù)Right （“安徽省合肥市”，3）的返回值是7．在Access 中，操作查詢包括生成表查詢、更新查詢、追加查詢和。

8．在Access 中，創(chuàng)建交叉表查詢需要指定3種字段，分別是行標(biāo)題、列標(biāo)題和。

9．在Select 語句中，通過10．將文本框的*”顯示。

11．一般來說，縱欄式窗體每次只顯示條記錄。

12．在Access 數(shù)據(jù)庫中，窗體和報表的數(shù)據(jù)來源主要包括表、SQL 語句。

13．報表的視圖主要有3種，分別是設(shè)計視圖、打印預(yù)覽視圖和。

14．在Access 數(shù)據(jù)庫中，數(shù)據(jù)訪問頁是一個獨立的文件，其文件類型是15．一個較大的VBA 程序通常由幾個相對獨立的部分組成，每部分稱為。

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

三、閱讀理解題（每題3分，共15分）

1．窗體中有一個名稱為Command1的命令按鈕。閱讀下列程序，并回答：①該過程在什么情況下被觸發(fā)？②其中的輸出語句是什么？③過程執(zhí)行后，消息框中顯示的內(nèi)容是什么？

Private Sub Command1_click()

Dim x(1To 10) As Integer, i As Integer

x(1)=1

x(2)=1

For i =3To 10Step 1

x(i)=x(i-1) x(i-2)

Next i

MsgBox (x(5))

End Sub

2．閱讀下列程序，并回答：①Fun 函數(shù)的功能是什么？②Fun 函數(shù)的參數(shù)傳遞方式是什么？③執(zhí)行Proc2過程后，消息框中顯示的內(nèi)容是什么？

Function fum(ByValx As Integer) As Double

Dim i As Integer, n As Double

n =1’為存放乘積的變量賦初值

For i =1To x

n =n *i

Next i

Fun =n

End Function

Private Sub Proc2()

MsgBox Fun(6)

End Sub

3．閱讀下列程序，并回答：①循環(huán)結(jié)束后，變量i 的值是什么？②循環(huán)共執(zhí)行了多少次？③程序執(zhí)行后，消息框中顯示的內(nèi)容是什么？

Private Sub Proc3()

Dim i As Integer, s As Integer

i =2

Do While i <=100

s =s i *2

i =i 2

Loop

MsgBox s

End Sub

4．閱讀下列程序，并回答：①輸入是通過什么語句實現(xiàn)的？②&運算符的作用是什么？③程序執(zhí)行時，如果輸入的數(shù)字是88和75，消息框中顯示的內(nèi)容是什么？

Private Sub Proc4()

Dim bscj As Integer, jscj As Integer, dj As String

bscj =InputBox("輸入筆試成績（要求在0到100之間！：")

jscj =InputBox("輸入機試成績（要求在0到100之間?。?)

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

If bscj >100Or jscj >100Or bscj <0Or jscj <0Then

dj =" 輸入非法"

ElseIf bscj >=85And jscj >=85Then

dj =" 優(yōu)秀"

ElseIf bscj >=60And jscj >=60Then

dj =" 合格"

Else

dj =" 不合格"

End If

End If

MsgBox " 你計算機水平考試的等級為：" &dj

End Sub

5．本題涉及到的表如圖1所示，閱讀下列程序，并回答：①程序執(zhí)行后，消息框中顯示的內(nèi)容是什么？②為了保證從第一條記錄開始訪問工資表，使用的語句是什么？③Do While 循環(huán)執(zhí)行后，工資表中哪

一個字段的值將發(fā)生改變？

圖1工資表

Private Sub Proc5()

Dim db As DAO.Database ' 定義數(shù)據(jù)庫對象變量

Dim rs As DAO.Recordset ' 定義記錄集對象變量

Dim gz As DAO.Field, zc As DAO.Field, sum As Currency, rate As Single

Set db =CurrentDb()' 連接當(dāng)前數(shù)據(jù)庫

Set rs =db.OpenRecordset("工資") ' 打開數(shù)據(jù)記錄集

Set gz =rs.Fields("工資")

Set zc =rs.Fields("職稱")

sum =0

rs.MoveFirst

Do While Not rs.EOF

rs.Edit ' 編輯工資表

Select Case zc

Case Is =" 教授"

rate =0.15

Case Is =" 副教授"

rate =0.1

Case Else

rate =0.05

End Select

sum =sum gz *rate

gz =gz gz *rate

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

rs.Update ' 更新工資表

rs.MoveNext ' 記錄指針移至下一條記錄

Loop

rs.Close ' 關(guān)閉記錄集

db.Close ' 關(guān)閉數(shù)據(jù)庫

Set rs =Nothing

Set db =Nothing

MsgBox " 漲工資總計：" &sum

End Sub

四、編程題（共15分）

1．快遞公司為吸引客戶，規(guī)定新客戶可享受5的運費優(yōu)惠，老客戶在單次運費達到50元時可享受4的優(yōu)惠，達到100元時可享受8的優(yōu)惠。窗體中已經(jīng)設(shè)計了3個文本框（名稱依次為Text1、Text2和Text3），分別表示快件的單價、數(shù)量和應(yīng)付款；一個命令按鈕（標(biāo)題為“計算”，名稱為Command1）；一個選項組（標(biāo)題為“顧客類型”，名稱為Frame1）；兩個選項按鈕（標(biāo)題分別為“新客戶”和“老客戶”，名稱依次為Option1和Option2，在選項組中的值為1和2），如圖2所示。請編寫程序，在窗體中輸入單價與數(shù)量，選擇顧客類型，單擊“計算”按鈕，計算應(yīng)付款并顯示在Text3文本框中。（5

分）

圖2快遞公司郵寄費窗體圖3求和窗體

2．窗體中已設(shè)計好兩個文本框（名稱依次為Text1和Text2），分別表示輸入的整數(shù)N 與1到N 之間能被3整除的數(shù)字之和；一個命令按鈕（標(biāo)題為“求和“，名稱為Command1），如圖3所示。請編寫程序，在窗體中輸入N ，單擊“求和”按鈕，計算1到N 之間能被3整除的數(shù)字之和并顯示在Text2文本框中。（5

分）

圖4工資表圖5職工工資查詢窗體

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

3．圖4和圖5是已經(jīng)設(shè)計好的工資表和職工工資查詢窗體。窗體中有6個文本框（名稱依次為Text1、Text2、Text3、Text4、Text5和Text6），分別表示職工的職工號、姓名、基本工資、獎金、水電費和實發(fā)工資；兩個命令按鈕（標(biāo)題分別為“查詢”和“清空”，名稱分別為Command1和Command2）。程序的功能如下：（5分）

①運行窗體時，首先輸入職工號或姓名，單擊“查詢”按鈕，將工資表中符合條件的記錄顯示在對應(yīng)的文本框中，計算實發(fā)工資并寫入工資表中。

②單擊“清空”按鈕，將所有文本框的內(nèi)容清空。

說明：①已給出部分代碼，請補充完整。②實發(fā)工資=基本工資 獎金-水電費

Private Sub command1_click()

Dim cn As New ADODB.Connection ' 連接對象

Dim rs As New ADODB.Recordset ' 連接記錄集

Rem 將以下6個變量定義為Field （字段）對象類型

Dim zgh Dim xm As ADODB.Field

Dim jbgz As ADODB.Field

Dim jj As ADODB.Field

Dim sdf As ADODB.Field

Dim sfgz As ADODB.Field

Set cn =CurrentProject.Connection

rs.Open " 工資", cn, adOpenDynamic, adLockOptimistic, adCmdTable Set xm =rs.Fields("姓名")

Set jbgz =rs.Fields("基本工資")

Set jj =rs.Fields("獎金")

Set sdf =rs.Fields("水電費")

Set sfgz =rs.Fields("實發(fā)工資")

Do While Not rs.EOF

If zgh =text1Or xm =text2Then ' 結(jié)束循環(huán)

End If

rs.MoveNext ' 記錄指針移至下一條記錄

Loop

if then ' 如果在工資表中有指定的職工

text1=zgh

text2=xm

text3=jbgz

text4=jj

text5=sdf

text6=' 計算實發(fā)工資并顯示在Text6文本框中' 更新實發(fā)工資字段

End If

rs.Save

rs.Close ' 關(guān)閉記錄集' 關(guān)閉連接

Set rs =Nothing

全國高等學(xué)校（安徽考區(qū)）計算機水平考試（二級Access 數(shù)據(jù)庫程序設(shè)計）(2010.6)

Set cn =Nothing

End Sub

Rem 程序的功能是單擊“清空”按鈕，將所有文本框的內(nèi)容清空。Private sub text1=""

text2=""

text3="" text5=""

text6="" ' 過程結(jié)束

參考答案歡迎索?。簂lqsmile@163.com